单项选择题

窗体上有一个名为text1的文本框和一个名为command1的命令按钮，事件过程如下：
Private Sub command1_click()
Dim i As Integer，n As Integer
For j=0 to 50
i=i+3
n=n+1
If i＞10 Then Exit For
Nextj
text1=str(n)
End Sub
程序运行时单击命令按钮，文本框中显示的值是（）。

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

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

单项选择题
在窗体有两个名为text1、text2的文本框和一个名为Command1的命令按钮，事件过程： Private sub command1_click() Dim x as Integer，n as Integer x=1 n=0 Do While x＜20 x=x*3 n=n+1 Loop text1=str(x) text2=str(n) End Sub 程序运行后，单击命令按钮，在两个文本框text1和text2中显示的值分别是______。
A．15和1
B．27和3
C．195和3
D．600和4
单项选择题
在窗体中有一个命令按钮Command1，编写事件代码如下： Private Sub Command1_Click() Dim s As Integer s=P(1)+P(2)+P(3)+P(4) debug.Print s End Sub Public Function P(N As Integer) Dim Sum As Integer Sum=0 For i=1 To N Sum=Sum+i Next i P=Sum End Function 打开窗体运行后，单击命令按钮，输出结果是______。
A．15
B．20
C．25
D．35
相关试题