单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() a = 2 For i=1 To 3 Call funl(i，a) Next i x = i + 2 Print x；a End Sub Private Sub fun1(n，m) m=m + n * 2 n = n + m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是

A．1 5
B．4 5
C．8 4
D．3 4
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() Dim x As Integer， n As Integer x = 1 n = 0 Do While x ＜ 20 x = x * 3 n = n + 1 Loop Text1．Text = Str(x) Text2．Text = Str(n) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别是
A．15和1
B．27和3
C．195和3
D．600和4
单项选择题
阅读下列程序： Private Sub Form Click() Dim i As Integer， sum As Integer For i = 2 To 10 If i Mod 2 ＜＞ 0 Then Print i； Else sum = sum + i End If Next i Print sum End Sub 程序运行后，单击窗体，在窗体上的输出结果是
A．3 5 7 9 30
B．1 3 5 7 9
C．2 4 6 8 20
D．11 15 17 19 20
相关试题