窗体上有1个名称为Text1的文本框;1个名称为Timer的计时器控件,其Interval属性值为5000,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=&HPP& ’&HFF&为红色
Else
Text1.ForeColor=&HC000& ’&HC000&为绿色
End If
End Sub
以下叙述中正确的是()
A、每次执行此事件过程时,flag的初始值均为0
B、 flag的值只可能取0或1
C、程序执行后,文本框中的文字每5秒改变一次颜色
D、程序有逻辑错误,Else分支总也不能被执行
参考答案:C
解析:
flag变量为静态变量;第1次执行Timer1_Timer事件过程,flag=-1,文本框为绿色;第2次执行Timer1_ Timer事件过程,flag=1,文本框为红色;第3次执行Timer1_Timer事件过程,flaq=-1,文本框为绿色;依次类推,每执行一次,文本框的颜色变换一次,时间间隔为5秒,所以正确答案为C)。