A.11
B.22
C.33
D.0
[单选题]在窗体上画一个命令按钮Command1和一个文本框Text1,然后编写如下程序: Private Sub Command1_Click() A=InputBox("请输入日期(1~31)") t="旅游景点:"_ & IIf(A>0 And A<=10, "长城","")_ & IIf(A>10 And A<=20,"故宫","")_ & IIf(A>20 And A<=30,"颐和园","") Text1.Text=t End Sub 程
[单选题]在窗体上画一个命令按钮Command1和一个文本框Text1,然后编写如下程序: Private Sub Command1_Click() A=InputBox("请输入日期(1~31)") t="旅游景点:" & IIf(A>0 And A<=10,"长城","")_ & IIf(A>10 And A<=20,"故宫","")_ & IIf(A>20 And A<=30,"颐和园","") Text1.Text=t End Sub 程序运
[主观题]在窗体上画一个命令按钮Command1,然后编写如下程序:Private Sub Command1_Cliek()D.im arr()As IntegerRe Dim arr(3)F.or i=0 To 3arr(i)=iNext ix=InputBox("请输入一个数字:")IfVal(x)>4 ThenRc Dim arr(4)arr(4)=xE.nd IfMe.Print(arr(4)-arr(3))E.nd Sub程序运行后,单击命令按钮,在输入对话框中输入12,输出结果为[ ]。
[单选题]在窗体上画一个命令按钮,然后编写如下程序 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
[单选题]( 23 ) 在窗体上画一个命令按钮,名称为 Command1 ,然后编写如下代码:Option Base 0Private Sub Command1_Click()D.im A(4) As Integer,B(4) As IntegerF.or k = 0 To 2A.(k + 1) = InputBox(" 请输入一个整数 ")B.(3 - k) = A(k + 1)Next kPrint B(k)E.nd Sub程序运行后,单击命令按钮,在输入对话框中分别输入 2 、 4 、 6 ,输
[单选题]在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private Sub Command1_Click()F.or I=1 To 2F.or J=1 To IPrint String(I,"Hello");Next JPrintNext IE.nd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A.H HH HHB.H HHHHC.HHHHHD.H HH HHHH
[单选题]在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private Sub Command1_ Click()Dim a As Integer, b As Integerb = 1for a = 1 To 100 if b>= 10 then exit for if b Mod 3 = 1 then b=b+3 End ifNext aPrint aEnd Sub在命令按钮上单击后,窗体上显示的结果是______。A.101B.6C.5D.4
[单选题]在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_ Click()Dim a As Integer, b As Integerdo while b <100 b=b+5 a=a+ b if b >20 then exit doLoopPrint a, bEnd Sub程序运行后,如果甲击命令按钮,则在窗体上显示的内容是______。A.50 20B.75 25C.50 25D.75 20
[单选题]在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private Sub Command1_ Click() for i = 1 To 4 for j= 0 To i Print Chr$(65 +i) Next j Print Next iEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是______。A.BB CCC DDDD EEEEEB.B CC DDD EEEEC.AA AA CCCC DDDDDD.A BB CCC DDDD
[单选题]在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer If a=0 Then x=x-1 Else If b<>0 Then End If End If If c<>0 Then x=3 Else x=4 End If Print x End Sub 程序运行后,单击命令按钮,其输出结果为 ______。A.34B.4C.35D.3