单项选择题

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

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

单项选择题
设有如下程序：Private Sub Command1_Click()Dim c As Integer, d As Integer c = 4 d = InputBox( 请输入一个整数 )Do While d > 0If d > c Then c = c + 1 End If d = InputBox( 请输入一个整数 )Loop Print c + dEnd Sub程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0，则输出结果是______。
A．12
B．11
C．10
D．9
单项选择题
单击命令按钮时，下列程序的运行结果为（ ）。Private Sub Command1_Click()Print MyFund(20，18)End SubPublic Function MyFund(m As Integer，n As Integer)As IntegerDo While m＜＞nDo While m＞n：m=m-n：LoopDo While m＜n：n=n-m：LoopLoopMyFund=mEnd Function
A．0
B．2
C．4
D．6
相关试题