A.2 3 4
B.2 5 9
C.3 5 4
D.2 4 3
[单选题]在窗体上画一个命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As integer b = 1 For a = 1 To 100 If b >= 10 Then Exit For If b Mod 3 = 1 Then b = b + 3 End If Next a Print a End Sub 在命令按钮上单击后,窗体上显示的结果是 ______。A.101B.6C.5D.4
[单选题]在窗体上画一个命令按钮,然后编写如下程序: Private Sub Commandl_Click( ) Dim a AS Integer,b As Integer a=15 b=2 t N(a,B)End Sub Function N(x As Integer,y As Integer) As Integer N=IIf(x)y,x,y) End Function 程序运行后,单击命令按钮,输出结果为A.1B.2C.15D.8
[单选题]在窗体上画一个命令按钮,然后编写如下程序 Private Sub Command1_Click( ) Dim a As Integer,b As hiteger a=1 b=2 Print N(a,B)End Sub Function N(x As Integer,y As Integer)As Integer N=IIf(x>y,x,y) End Function 程序运行后,单击命令按钮,输出结果为A.1B.2C.5D.8
[单选题](29)在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )D.im I, NumRandomizeD.oF.or I=1 To 1000Num=Int(Rnd*100)Print Num;Select Case NumC.ase 12E.xit ForC.ase 58E.xit DoC.ase 65, 68, 92E.ndE.nd SelectNext ILoopE.nd Sub上述事件过程执行后,下列描述中正确的是( )。A.)Do 循环执
[单选题]在窗体上画一个命令按钮,然后编写如下事件过程:private sub command1_click()dima,basintegera=Val(inputbox("EntertheFirstinteger"))b=Val(inputbox("EntertheSecondinteger"))Printb+aend sub程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和111,则输出结果是( )A.456B.111C.567D.111456
[主观题]在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()D.im Y as StringX=5Y=X & Space(3) & XPrint X;Print Trim(Y);Len(Trim(Y))E.nd Sub该程序的执行结果是[ ]。
[单选题]在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()F.or i=1 To 4x=4F.or j=1 To 2x=x+6NextNextPrint xE.nd Sub程序运行后,单击命令按钮,输出结果是A.12B.13C.16D.17
[单选题]在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Commandl_Click()D.im I,NumRandomizeD.oF.or I=1 To 1000Num=Int(Rnd*100)PrintNum;SelectCase NumC.ase 12E.xit ForC.ase 58E.xit DoC.ase 65,68,92E.ndE.nd SelectNextILoopE.nd Sub上述事件过程执行后,下列描述中正确的是A.Do循环执行的次数为1000次B.在For循
[单选题]在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()F.or i=1 To 4x=4F.or j=1 To 3X=3F.or k=1 To 2x=x+6NextNextNextPrint xE.nd Sub 程序运行后,单击命令按钮,输出的结果是A.7B.15C.157D.538
[单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() x=O Do Until X=-1 a=InputBox("请输入a的值") a=Val(A) b=InputBox("请输入b的值") b=Val(B)x=lnputBox("请输入x的值") x=Val(x) a=a+b+x Loop Printa End Sub 程序运行后,单击命令按钮,依次在输入对话框中输入10、8A.12B.13C.14D.15