Private Sub Commandl—Click()
D．im a(3，3)
F．or m=1 T0 3
F．0r n=1 To 3
If n=m Or n=4-m Then
a(m，n)=m+n
E．lse
a(m，n)：0
E．nd If
Print a(m，n)；
Next n
Prim
Next m
E．nd Sub
运行程序，单击命令按钮，窗体上显示的内容为
A．2 0 0
B．2 0 4
C．2 3 0
D．2 0 0
[单选题]在窗体上画1个命令按钮，并编写如下事件过程：Private Sub Command1-Click()F．or i=5 To 1 Step-0．8Print Int(i)；Next iE．nd Sub运行程序，单击命令按钮，窗体上显示的内容为A．5 4 3 2 1 1B．5 4 3 2 1C．4 3 2 1 1D．4 4 3 2 1 l
[单选题]在窗体画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim a(5)As String For i=1 To 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后，单击命令按钮，输出结果是______。A． ABCDEB．1 2 3 4 5C．abcdeD．出错信息
[单选题]在窗体画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(5)As String For i=1 To 5 a(I)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b； Next End Sub 程序运行后，单击命令按钮，输出结果是______。A．ABCDEB．1 2 3 4 5C．abcdeD．出错信息
[单选题]在窗体上画一个命令按钮，然后编写如下程序： 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
[单选题]（ 23 ）在窗体上画 1 个命令按钮，并编写如下事件过程：Private Sub Command1_Click()F．or i=5 to 1 step -0.8Print Int(i);Next iE．nd Sub运行程序，单击命令按钮，窗体上显示的内容为A． ） 5 4 3 2 1 1B． ） 5 4 3 2 1C． ） 4 3 2 1 1D． ） 4 4 3 2 1 1
[单选题]（ 24 ）在窗体上画 1 个命令按钮，并编写如下事件过程：Private Sub Command1_Click()D．im a(3,3)F．or m=1 To 3F．or n=1 To 3If n=m Or n=4-m Thena(m,n)=0E．nd IfPrint a(m,n);Next nPrintNext mE．nd Sub运行程序，单击命令按钮，窗体上显示的内容为A． ）2 0 00 4 00 0 6B． ）2 0 40 4 04 0 6C． ）2 3 03 4 00 0 6D． ）
[单选题]（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