单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
　　Dim m(10)As Integer
　　Dim b(3)As Integer
　　s = 0
　　For i = 1 To 10
　　　　m(i)= i
　　Next i
　　For i = 1 To 3
　　　　b(i)= m(i * i)
　　Next i
　　For i = 1 To 3
　　　　s = s + b(i)* 3
　　Next i
　　Print s
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是________。

A．78
B．10
C．33
D．42
<上一题 目录 下一题>
热门 试题

单项选择题
阅读程序： Option Base 1 Private Sub Form_Click( ) Dim Arr(4，4)As Integer For i = 1 To 4 For j = 1 To 4 Arr(i， j)= (i - 1)* 2 +j Next j Next i For i = 3 To 4 For j = 3 To 4 Print Arr(j， i); Next j Print Next i End Sub 程序运行后，单击窗体，输出结果是________。
A．5　7　6　8
B．6　8　7　9
C．7　9　8　10
D．8　10　8　11
单项选择题
在窗体上画的3个名称为Command1命令按钮是控件数组，从左到右，控件数组下标分别为0、1、2。如图1所示。有下列程序： Private Sub Command1_Click(Index As Integer) Dim s As String Select Case Index Case 0 s = 飞机 Case 1 s = 汽车 Case 2 s = 火车 End Select MsgBox s, Index End Sub 执行程序后，单击中间那个按钮，显示的对话框的形式为________。
相关试题