单项选择题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim iAsInteger，n As Integer
For i=0 To 50
i=i+3
n=n+1
If i＞10 Then Exit For
Next
Text1.Text=Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是（）

A．2
B．3
C．4
D．5

<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=5 : y=2 Call sub1((x)，y) Print x;y End Sub Private Sub sub1(m，n) t=m : m=n : n=t End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（）

A．2 5
B．5 4
C．1 4
D．5 5
单项选择题
阅读如下程序： Private Sub Form_Click() Dim num As Integer，digit As Integer num=InputBox( 输入数据 ) Do While num ＜＞ 0 digit=num Mod 10 num=num 10 Print digit； Loop End Sub 程序运行后，如果从键盘上输入12345，则输出的结果为（）

A．1 3 7 5 9
B．5 4 3 2 1
C．2 4 6 8 10
D．1 2 3 4 5
相关试题