单项选择题

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
x = 0
n=InputBox(" ")
For i = 1 To n
For j=1 To i
x = x + 1
Next i
Next i
Print x
End Sub
程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是

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

单项选择题
在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Command1_Click() n = Text1.Text Select Case n Case 1 To 20 x = 10 Case 2， 4， 6 x = 20 Case Is ＜ 10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是
A．10
B．20
C．30
D．40
单项选择题
假定有如下事件过程： Privte Sub Form_Click() Dim x As Integer，n As Integer x=1 n=0 Do While x＜28 x=x*3 n=n+1 Loop Print x，n End Sub 程序运行后，单击窗体，输出结果是
A．81 4
B．56 3
C．28 1
D．243 5
相关试题