End Sub 该程序执行后,输出结果是( )。



[单选题]单击窗体上Command1命令按钮时,执行如下事件过程: Private Sub Command1-Click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) Msgbox a $,,b$;c$,1 End sub 则在弹出的信息框的标题栏中显示的信息是( )。A.software and hardwareB.softwareC.hardwareD.1
[单选题]窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()Sum = 0F.or m = 1 To 3Select Case mC.ase 1a = 1C.ase 2a = 2C.ase 3a = 3E.nd SelectPrint a,Sum = Sum + aNext mPrint SumE.nd Sub运行时,单击按钮,输出结果是( )。A. 3 3 3 9B. 3 2 1 6C. 1 1 1 3D. 1 2 3 6
[单选题]窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()a = 80: b = 50: c = 30If ac Then b = cIf b = c And ac Then c = a + bPrint a, b, cE.nd Sub运行时,单击按钮,窗体输出的结果是( )。A. 80 50 30B. 80 30 30C. 50 30 80D. 50 30 30
[单选题]窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()x = InputBox("x=")y = InputBox("y=")Print x + yE.nd Sub运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。A. 444B. 123321C. 123+321D. 出错信息
[单选题]在一个窗体上添加命令按钮控件,名为Command1,事件过程如下,则该过程的执行结果为______。Option Base 1Private Sub Command1_ Click() Dim a(5)As Integer Dim k As Integer Dim Total As Integer a (1)= 2 a (2)= 5 a (3)= 4 a (4)= 10 a (5)= 6 for k =1 To 5 Total = Total +a(k) Next k Print TotalEn
[单选题]在窗体上添加一命令按钮,名称为Command1,然后为该命令按钮编写如下事件过程,该过程的执行结果为Option Base 1Private Sub Command1_Click()D.im a As Varianta=Array(1,2,3,4)j=1F.or i=4 To 1 Step -1s=s+a(i)*jj=j*10NextPrint sE.nd SubA.4321B.1234C.34D.12
[单选题]在窗体上添加一命令按钮,名称为Command1,然后为该命令按钮编写如下事件过程,该过程的执行结果为 Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next Print s End SubA.4321B.1234C.34D.12
[单选题]在窗体上添加一个命令按钮,名为Command1,然后为该命令按钮编写如下事件过程,该过程执行结果为______。Option Base 1Private Sub Cemmand1_Click() Dim a As Variant a = Array(1, 2, 3, 4) j = 1 for i = 4 To 1 Step - 1 s = s+ a(i)* j j= j* 10 Next i Print sEnd SubA.4321B.1234C.34D.12
[单选题]在窗体上添加一个命令按钮,名为Command1,事件过程如下:程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1后,输出的结果是______。A.5B.4C.3D.2
[单选题]窗体中有命令按钮Command1,事件过程如下:Public Function f(x As Integer)As IntegerD.im y As Integerx=20y=2f=x*YE.nd FunctionPrivate Sub Command 1_Click()D.im y As Integerstatic x As Integerx=10y=5y=f(x)D.ebug.Print x;yE.nd Sub运行程序,单击命令按钮,则立即窗口中显示的内容是( )。A.10 5B.10 40