单项选择题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
Dim i AsInteger, 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和Command2，有如下程序： Private Sub Conunand1_Click( ) Print Visual ； End Sub Private Sub Command2_Click( ) Print Basic ; End Sub Private Sub Form_Load( ) Comraand2. Cancel=True Coramand1. Cancel=True End Sub 执行程序后，按键盘Cancel键，在窗体上输出结果是______。

A．Basic
B．Visual
C．Cancel
D．True

单项选择题

在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是：单击命令按钮后，程序用“筛选法”求出1～100之间的全部素数。将其素数在列表框中显示出来。根据题意，填空处应该选择______。 Option Base 1 Dim a(100)As Integer Private Sub Command1_Click( ) n=100 For i=2 To Sqr(n) For j=i+1 To n If j Mod i=0 And a(j)＜＞0 Then a(j)=0 Next j Next i For i=1 To n If a(i)＜＞0 #Then Next i End Sub Private Sub Form_Load( ) For i=1 To 100 a(i)=i Next i End Sub

相关试题