单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim i As Integer,n As Integer
For i=0 To 100
i=1+5
n=n+1
If i>20 Then Exit For
Next
Text1.Text=Str(n)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是______。
A) 2
B) 3
C) 4
D) 5
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
以下数组定义语句中,错误的是______。
A) Dim arr(-5) As Integer
B) Static arr(5)
C) Dim arr(2,1 To 3)
D) Dim arr(0 To 2,1 To 3)As Integer
点击查看答案&解析
单项选择题
窗体上有一个名称为Text1的文本框;一个名称为Timer1的计时器控件,其Interval属性值为2000,Enabled属性值是True。Timer1的事件过程如下: Private Sub Timer1_Timer() Static flag As Integer If flag=0 Then flag=1 flag=-flag If flag=1 Then Text1.ForeColor=&HFF&'&HFF&为红色 Else Text1.ForeColor=&HC000&'&HC000&为绿色 End If End Sub 以下叙述中正确的是______。
A) flag的值只可能取0或1
B) 程序有逻辑错误,Else分支总也不能被执行
C) 每次执行此事件过程时,flag的初始值均为1
D) 程序执行后,文本框中的文字每2秒改变一次颜色
点击查看答案&解析
相关试题
SetFocus
A
Form2
Addltem
Text1.Text