窗体上有1个名称为Textl的文本框;1个名称为Thnerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timed的事件过程如下: Privat Sub Timerl_Timet( ) Static flag

admin2020-06-30  37

问题 窗体上有1个名称为Textl的文本框;1个名称为Thnerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timed的事件过程如下:
Privat Sub Timerl_Timet(     )
Static flag As Integer
lfflag=0 Then flag=1
flag=-flag
Ifflag=1 Then
Textl.ForeColor=&HFF&  ’&HFF&为红色
Else
Textl.ForeColor=&HC000$  ’&HC000&为绿色
End If
End Sub
以下叙述中正确的是(     )。

选项 A、每次执行此事件过程时,flag的初始值均为0
B、flag的值只可能取0或1
C、程序有逻辑错误,Else分支总也不能被执行
D、程序执行后,文本框中的文字每5秒改变一次颜色

答案D

解析 计时器控件(Timer)用来完成有规律性时间间隔执行的任务,Interval属性用于设置计时器事件之间的间隔,以毫秒为单位。
在每5秒执行一次的Timer事件过程中,通过静态变量flag值的交替变换(即-1和1之间)来控制文本框中文字的颜色,值为-1时为绿色,值为1时为红色。除程序刚启动第一次执行Timer事件过程时,静态变量flag的初始值为0外,其余各次均为-1或1。
转载请注明原文地址:https://jikaoti.com/ti/AHS0FFFM
0

最新回复(0)