单项选择题
在窗体上画两个名称为Tcxt1、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 +l
Loop
Text1.Text=Str(x)
Text2.Text=Str(n)
End Sub
程序运行后,单击命令按钮,在两个文本框中显示的值分别是( )。
A.9和2
B.27和3
C.195和3
D.600和4
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim array1(10,10)As Integer Dim i,j As Integer For i=1 To 3 For j=2 To 4 array1(i,j)=i +j Next j Next i Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是( )。
A.12
B.13
C.14
D.15
点击查看答案&解析
单项选择题
当键入Shift键时,触发了下列选项中的哪一个事件( )。
A.KeyPress
B.KeyDown
C.KeyUp
D.Click
点击查看答案&解析
相关试题
表达式 12 + 3 +45的值是 【1...
下列程序的运行结果为 【16】 。 A=...
Visual Basic中,允许一个变量未加定义直...
下列程序输出的结果为 【13】 。 Priv...
假设变量intVar为一个整型变量,则执行赋值...