单项选择题
在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程:
Private Sub Command1_Click()
x=0
Do While x<50
x=(x+2)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
End Sub
程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )
A.1和0
B.2和72
C.3和50
D.4和168
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
用下面语句定义的数组的元素个数是( ) Dim A (-3 To 5)As Integer
A.6
B.7
C.8
D.9
点击查看答案&解析
单项选择题
在窗体上画一个名称为Label1、标题为“Visual Basic考试”的标签,两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如右图所示。编写如下程序: Private Sub Form_Load() Timer1.Enabled=false End Sub Private Sub Command1_Click() Timer1.Enabled=True End Sub Private Sub Timer1_Timer() If Label1.Left<Width Then Label1.Left=labell.Left+20 Else Label1.Left=0 End If End Sub 程序运行后单击“开始”按钮,标签在窗体中移动。 对于这个程序,以下叙述中错误的是( )
A.标签的移动方向为自右向左
B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动
C.当标签全部移出窗体后,将从窗体的另一端出现并重新移动
D.标签按指定的时间间隔移动
点击查看答案&解析
相关试题
新建一个工程,内有两个窗体,窗体Form1上...
完成下面的程序,使显示结果如下图所示。 ...
在窗体上画一个名称为Labe1的标签和一个名...
Visual Basic对象可以分为两类,分别为_...
在进行模块测试时,要为每个被测试的模块另...