在窗体中有一个名为Command1的命令按钮，事件代码如下：Private Sub Command1_Click（ ）Dim m(10)For k=1 T0 10m(k)=11=kNext kx=6MsgBox m(2+m(x))End Sub打开窗体，单击命令按钮，消息框的输出结果是（ ）。A.2B.3C.4D.5
在窗体中有一个名为Command1的命令按钮，事件代码如下：
Private Sub Command1_Click（ ）
Dim m(10)
For k=1 T0 10
m(k)=11=k
Next k
x=6
MsgBox m(2+m(x))
End Sub
打开窗体，单击命令按钮，消息框的输出结果是（ ）。
A.2
B.3
C.4
D.5
相关考题：
（ 11 ）在窗体中添加一个名称为 Command1 的命令按钮，然后编写如下事件代码：Private Sub Command1_Click( )Dim x As Integer, y As Integerx=12 : y=32Call p(x, y)MsgBox x*yEnd SubPublic Sub p (n As Integer, By Val m As Integer)n=n Mod 10m=m Mod 10End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为 ___________ 。
在窗体中有一个标签 Lb1 和一个命令按钮 Command1 ，事件代码如下：Option Compare DatabaseDim a As String*10Private Sub Command1_Click()a="1234"b=Len(a)Me.Lb1.Caption=bEnd Sub打开窗体后单击命令按钮，窗体中显示的内容是A. 4B. 5C. 10D. 40
（ 11 ）在窗体中有一个名为 command 的命令按钮， click 事件的代码如下：private sub command1_click()f=0for n=1 to 10 step 2f=f+nnext nme!lb1.caption=fend sub单击命令按钮后，标签显示的结果是 ___[11]___ 。
在窗体上画一个名称为 \Command1\ 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）Dim a As StringA="123456789"For i=1 To 5Print Space（6-i）;Mid $ （a,______ ,2*i-1）Next iEnd Sub程序运行后，单击命令按钮，窗体上的输出结果是5456345672345678123456789请填空。
在窗体上添加一个命令按钮(名为Conunand1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click() m=2170 n=Len (Str$ (m) +Space (5)) Me! Text1=n End Sub打开窗体运行后，单击命令按钮，在文本框中显示( )。A．5B．8C．9D．10
在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click（）Dim s，iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为 。
（23）在窗体上画一个名为 Command1 的命令按钮，然后编写以下程序：Private Sub Command1_Click( )Dim M(10) As IntegerFor k=1 To 10M(k)=12-kNext kx=8Print M(2+M(x))End Sub运行程序，单击命令按钮，在窗体上显示的是（ ）。A）6B）5C）7D）8
在窗体中有一个命令按钮command1，编写事件代码如下： Private Sub Command1_Click() Dim s As Integer s=P(1)+P(2)+P(3)+P(4) Debug.Print s End Sub Public Function P(N As Integer) Dim Sum As Integer Sum=0 For i=1 To N Sum=Sum+1 Next i P=Sum End Function 打开窗体运行后，单击命令按钮，输出的结果是( )。A．15B．20C．25D．35
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，编写如下事件过程：Private Sub Command1_Click()Dim x As Integer,y As Integer,z As IntegerCall f(x,y,z)End SubSub f(a As Integer,b As Integer,c As Integer)c=b*aEnd Sub打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
在窗体上有一个命令按钮Command1，编写事件代码如下：Private Sub Command1_Click()Dim a(10)，P(3) As Integerk=5For i=1 To 10For i=1 To 3For i=1 To 3End Sub打开窗体运行后，单击命令按钮，消息框中输出的结果是( )。
在窗体上画一个命令按钮，然后编写如下代码：Private Sub Command1_Click()Dim M (10) As IntegerFor k=1 To 10M(k)=12-kNext kx=6Msgbox M(2+M(x))End Sub程序运行后，单击命令按钮，消息框显示的是【 】。
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：Private Sub Command1_Click()Dim a As Integer,b As Integerx=10y=20End Sub打开窗体运行后，单击命令按钮，消息框的输出结果为( )。
在窗休中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() Dim a(10,10) For m=2 To 4 For n=4 To 5 a(m,n)=m*n Next n Next m MsgBox a(2,5)＋a(3,4)＋a(4,5) End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。A．22B．32C．42D．52
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click() m=2.17 n=Len(Str$(m)＋Space(5)) Me!Text1=n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示______。A．5B．8C．9D．10
在窗体中有一个标签Labele，标题为“测试进行中”，有一个命令按钮Command1，事件代码如下：Private Sub Command1_Click()Labele.Caption=“标签”End SubPrivate Sub Form_Load( )Form.Caption=“举例”Command1.Caption=“移动”End Sub打开窗体后单击命令按钮，屏幕显示( )。A．B．C．D．
在窗体上添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click( ) Dim a(10，10) For m=2 To 4 For n=4 TO 5 a(m，n)m*n Next n Next m MsgBox a(2，4)+a(3，5)+a(4，5) End Sub 打开窗体运行后，单击命令按钮，则消息框的输出结果是( )。A．23B．33C．43D．53
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim a()a＝Array("机床"，"车床"，"钻床"，"轴承")Print a(2)End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承
在窗体上有一个标签Lb1和一个命令按钮Command1，事件代码如下： Option Compare Database Dim a As String * 10 Private Sub Command1_Click( ) a="1234" b=Len(a) Me. Lb1. Caption=b End Sub 打开窗体后单击命令按钮，窗体中显示的内容是( )。A．4B．5C．10D．40
在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下：Option Compare DatabaseDim a As String*10Private Sub Command1 Click()a＝"1234"b＝Len(A)Me.Lb1.Caption＝bEnd Sub打开窗体后单击命令按钮，窗体中显示的内容是( )。A．4B．5C．10D．40
在窗体中添加一个名为Command1的命令按钮，然后编写如下程序：Private Sub s(By Val p As Integer)p=p*2End SubPrirate Sub Command1_Click( )Dim i As Integeri=3Call s(i)If i＞4 Then i=i^2MsgBox IEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
在窗体中有一个名为Command1的命令按钮，事件代码如下： Private Sub Command1_Click（ ） Dim m(10) For k=1 T0 10 m(k)=11=k Next k x=6 MsgBox m(2+m(x)) End Sub 打开窗体，单击命令按钮，消息框的输出结果是（ ）。A.2B.3C.4D.5
在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是A． 11B．10C．9D．8
窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框，事件代码如下： Private Sub Command1_Click Dim a(10)As Integer，b(10)As Integer n=3 For i=1 T0 5 a(i)=i b(n)=2*n+i Next i Me!Text1=a(n)+b(n) End Sub 打开窗体，单击命令按钮，文本框Text1中显示的内容是（ ）。A.13B.14C.15D.16
在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下： OPtion Compare Databse Dim a As String * 10 Private Sub COmmand1_Click() a="1234" b=Len(a) Me.Lbl.Caption=b End Sub 打开窗体后单击命令按钮，窗体中显示的内容是A．4B．5C．10D．40
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码：Private Sub Command1_Click()Dim x As Integer,y As Integerx=12：y=32Call p(x,y)MsgBox x*yEnd SubPublic Sub p(n As Integer,By Val m As Integer)n=n Mod 10m=m Mod 10End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为【 】。
（ 15 ）在窗体上添加一个命令按钮（名为 Command1 ），然后编写如下事件过程：Private Sub Command1_Click （）Dim b,kFor k=1 to 6b=23+kNext kMsgBox b+kEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是 【 15 】 。
（ 32 ） 在窗体上添加一个命令按钮 （ 名为 Command1 ） 和一个文本框 （ 名为 Text1 ） ， 并在命令按钮中编写如下事件代码：Private Sub Command1_Click( )m=2.17n=Len(Str$(m)+Space(5))Me!Text1 =nEnd Sub打开窗体运行后，单击命令按钮，在文本框中显示A ） 5B ） 8C ） 9D ） 10
（ 11 ）在窗体中添加一个命令按钮，名称为 Command1 ，然后编写如下程序：Private Sub Command1_Click()Dim s ， iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为 【 11 】 。