单项选择题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
　　Dim i As Integer,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
程序运行后，单击命令按钮，在文本框中显示的值是L )：

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

单项选择题
假定有如下的Sub过程： Sub S(x As Single,y As Single) t=x x=t y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=2 S a,b print a,b End Sub 程序运行后，单击命令按钮，输出结果是( )。
A．5 2
B．1 1
C．1.25 4
D．2.5 1
单项选择题
在窗体上绘制一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer,x As Integer For i_1 T0 6 If i=1 Then x=i If i＜=4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后，单击命令按钮，其输出结果为( )。
A．9
B．6
C．12
D．15
相关试题