单项选择题

在窗体上画一个名称为 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
<上一题 目录 下一题>
热门 试题

单项选择题
运行下列程序： Private Sub Form_Click( ) Sum = 0 For i = 1 To 100 If Mid(CStr(i)， 1， 1)= 1 Then Sum = Sum + 1 End If Next i Print Sum End Sub 单击窗体后，则在窗体上显示的结果是________。
A．12
B．13
C．14
D．15
单项选择题
在窗体上画一个名称为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
相关试题