（ 11 ）在窗体中有一个名为 command 的命令按钮， click 事件的代码如下：

private sub command1_click()

f=0

for n=1 to 10 step 2

f=f+n

next n

me!lb1.caption=f

end sub

单击命令按钮后，标签显示的结果是 ___[11]___ 。

[试题]（ 12 ）在窗体中有一个名为 Command12 的命令按钮， Click 事件的代码如下：该事件所完成的功能是：接受从键盘输入的 10 个大于 0 的整数，找出其中的最大值和对应的输入位置。请依据上述功能要求将程序补充完整。Private Sub Command12_Click( )max=0max_n=0F．or i=1 To 10num=Val(InputBox(" 请输入第 "& i &" 个大于 0 的整数： "))If (num>max)Thenmax=

[单选题]在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下：Sub Command1_Click()D．im student As studtypeD．im record_no As Integerrecord_no=1With student.ino=12.strname="smith".strsex="男".smark=89E．nd With_______Put # 1,record_no,studentC．lose # 1E．nd Sub要求在c: /

[单选题]在窗体上画一个名为Command1的命令按钮，其Command1_Click事件过程如下。 Sub Command1_Click() Dim student As studtype Dim record_no As Integer record n=1 With student .ino=12 .strname="Smith" .strsex=“男” .smark=89 End With ______ Put # 1，record_no，student Close # 1 End Sub 要

[单选题]在窗体上添加一个命令按钮，名为Command1，其单击事件中有下列程序段，则事件过程执行后，文本框中输出( )。F．or i=1 To 4F．or j=1 To 3x=3F．or k=1 To 2K=x+3Next kNext jNext iText1.Text=Str(x)A．3B．6C．9D．12

[单选题]（22）在窗体上添加一个命令按钮，名为Command1，其单击事件中有下列程序段，则事件过程执行后，文本框中输出 For i=1 To 4 For j=1 To 3 x= 3 For k=1 To 2 x=x+3 Next k Next j Next i Text1.Text=Str(x)A.3 B.6 C.9 D.12

[单选题]在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。 For i= 1 To 4 For j = 1 To 3 x=3 For k =1 To 2 x=x+3 Next k Next j Next i TextText = Str(x)A．3B．6C．9D．12

[单选题]在窗体中有一个命令按钮Command1，对应的事件代码如下： PrivateSubCommand1_Enter() Dim num As Integer Dim a As Integer Dim b As Integer Dim i As Integer For i=1 To 10 num=InputBox(“请输入数据：”，“输入”，1) If Int(num/2)=num/2Then a=a+1 Else b=b+l End If Next i MsgBox(“运行结果：a=“&St

[单选题]在窗体上添加一个命令按钮，名为command1，事件过程为：Private Sub command1_Click( )x=0D．o Until c=-1a= val(InputBox(“输入a的值”))b= val(InputBox(“输入b的值”))c= val(InputBox(“输入c的值”))LoopPrint aE．nd Sub程序运行后，单击命令按钮，依次在输入对话框中输入5，4，3，2，1，-1后，输出的结果是 ( )A．2B．3C．4D．5

[单选题]在窗体上添加一个命令按钮(名为Command1)，编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=-1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是( )。A．7B．15C．157D．528

[单选题]在窗体上添加一个命令按钮，名为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