单选题窗体上有一个名称为Text1的文本框;一个名称为Timer1的计时器控件,其Interval属性值为5000,Enable属性值是True。Timer1的事件过程如下:以下叙述中正确的是(  )。A每次执行些事件过程时,flag的初始值为0Bflag的值只可能取0或1C程序执行后,文本框的文字每5秒改变一次颜色D程序有逻辑错误,Else分支总也不能被执行

单选题
窗体上有一个名称为Text1的文本框;一个名称为Timer1的计时器控件,其Interval属性值为5000,Enable属性值是True。Timer1的事件过程如下:以下叙述中正确的是(  )。
A

每次执行些事件过程时,flag的初始值为0

B

flag的值只可能取0或1

C

程序执行后,文本框的文字每5秒改变一次颜色

D

程序有逻辑错误,Else分支总也不能被执行


参考解析

解析:
计时器每5秒触发一次,如果flag为0,则先转为1,然后转为-1,颜色为绿色;当flag为非0时,其值就会转为1,颜色变为红色;如果flag值为1,则转为0并保持不变,颜色变为绿色。flag变量为静态变量,在每次过程调用后值仍然存在,所以从第二次开始就不断的1和-1之间变换,如此不断循环,颜色每次都会变化。

相关考题:

在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是( )。A.Timer1.Interval=0.5B.Timer1.Interval=5C.Timer.Interval=50D.Timer1.Interval=500

( 23 )某人在窗体上画了一个名称为 Timer1 的计时器和一个名称为 Lab的属性设置为 Enabled=True, Interval=0, 并编程如下。希望在每 2 秒在标签上显示一次系统当前时间 。Private Sub Timer1_Timer()Label1.Caption=Time$End Sub在程序执行时发现未能实现上述目的,那么,他应做的修改是A )通过属性窗口把计时器的 Interval 属性设置为 2000B )通过属性窗口把计时器的 Enabled 属生设置为 FalseC) 把事件过程中的 Label1.Caption=Time$ 语句改为 Timer1.Interval=Tims$D) 把事件过程中的 Label1.Caption=Time$ 语句改为 Label1.Caption=Timer1.Time

( 26 )窗体上有 1 个名称为 Text1 的文本框; 1 个名为 Timer1 的计时器控件,其 Interval 属性值为5000 , Enable 属性值是 True 。 Timer1 的事件过程如下:Private Sub Timer1_Timer()Static flag As IntegerIf flag=0 Then flag=1flag=-flagIf flag=1 ThenText1.ForeColor=HFF ‘ HFF 为红色ElseText1.ForeColor=HC000 ‘ HC000 为绿色End IfEnd Sub以下叙述正确的是A )每次执行些事件过程时, flag 的初始值为 0B ) flag 的值只可能取 0 或 1C )程序执行后,文本框的文字每 5 秒改变一次颜色D )程序有逻辑错误, Else 分支总也不能被执行

窗体上有1个名称为Textl的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timerl的事件过程如下:Private Sub Timerl Tliner()Static flag As IntegerIfflag=0 Then flag=1flag=-flagIfflag=1 ThenTextl.ForeColor=HFF HFF为红色ElseTextl.ForeColor=HC000 HC000为绿色End IfEnd Sub以下叙述中正确的是A.每次执行此事件过程时,flag的初始值均为0B.flag的值只可能取0或lC.程序执行后,文本框中的文字每5秒改变一次颜色D.程序有逻辑错误,Else分支总也不能被执行

在窗体上有一个文本框控件,名称为TextTime;--个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为: Private Sub Timer1_ ______ TxtTime.text=Time End Sub 在下画线上应填入的内容是A.EnabledB.VisibleC.IntervalD.Time

(21)某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1的标签,计时器的属性设置为Enabed=True,Intervai=0,并编程如下。希望在程序运行时,可以每2秒在标签上显示一次系统当前时间 Private Sub Timer() Label1.Caption=Time$ End Sub 在程序执行时发现未能实现上述目的,那么,应做的修改是( )。A.通过属性窗口把计时器的Interval属性设置为2000B.通过属性窗口把计时器Enabled属性设置为FalseC.把事件过程中的Labell.Caption=Time$语句改为Timer1.Interval=Time$D.把事件过程中的Labell.Caption=Time$语句改为Labell.Caption=Timer1.Time

时钟组件(Timer)能有规律的以一定时间间隔触发_________ 事件,并执行该事件过程中的程序代码。为了使计时器控件Timer1每隔0.5秒就触发一次并执行事件代码,应将Timer1控件的Interval属性设置为_________

窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval 属性值为5000,Enabled属性值是True。Timer1的事件过程如下:Private Sub Timer1 Timer( )Static flag As IntegerIf Flag=0 Then Flag=1Flag=-flagIf flag=1 ThenText1.ForeColor=&HFF& &HFF&为红色ElseText1.ForeColor=&HCOO& &HCOO&为绿色End IfEnd Sub以下叙述中正确的是( )。A.每次执行此事件过程时,flag的初始值均为0B.flag的值只可能取0或1C.程序执行后,文本框中的文字每5秒改变一次颜色D.程序有逻辑错误,Else分支总也不能被执行

下列叙述中正确的是( )。A.标签控件不能接收焦点事件B.如果将文本框的TabStop属性值设为False,则该文本框将不能接收焦点事件C.窗体控件能接收焦点事件D.不能通过程序代码设置焦点属性

在窗体上有一个文本框控件,名称为TxtTime;一个计时器控件,名称为Timer1。为了使得每一秒钟在文本框中显示一次当前的时间,应将Interval属性值设置为A.1)B.10C.100D.1000

在窗体上有一个文本框控件,名称为TxtTime;一个计时器控件,名称为Timer1,要求每隔一秒钟在文本框中显示一次当前的时间。程序为: Private Sub Timer1. ______() TxtTime. text=Time End Sub 在下划线上应填入的内容是______。A.EnabledB.VisibleC.IntervalD.Timer

在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:程序运行后,单击命令按钮,在文本框中显示的值是__________。

某人在窗体上画了一个名称为Timer1的计时器和一个名称为Labe11的标签,计时器的属性设置为Enabled=True,Interval=0,并编程如下。希望在程序运行时,可以每2秒在标签上显示一次系统当前时间。 Private Sub Timer1_Timer() LabeCaption=Time$ End Sub 在程序执行时发现未能实现上述目的,那么,应作的修改是( )。A.通过属性窗口把计时器的Interval属性设置为2000B.通过属性窗口把计时器的Enabled属性设置为FalseC.把事件过程中的Labe11.Caption=Time$语句改为Timer1.Interval=Time$D.把事件过程中的Labe11.Caption=Time$语句改为Labe11.Caption=Timer1.Time

下列关于控件焦点的叙述中正确的是( )。A. 标签控件不能接收焦点事件B. 如果将文本框控件中TabStop属性值设为False,则该文本框将不能接收焦点事件C. 窗体控件不能接收焦点事件D. 不能通过程序代码设置焦点属性

窗体上有一个文本框,其Name属性为Text1,如图1所示,并有如下事件过程:上述程序的运行结果是( )。A. 在文本框Text1中输出55B. 在文本框Text1中输出0C. 语法错误D. 在文本框Text1中输出不定值

以下关于窗体的叙述中,错误的是A)窗体的Name属性用于标识一个窗体B)运行程序时,改变窗体大小,能够触发窗体的resize事件C)窗体的Enabled属性为False时,不能响应单击窗体的事件D)程序运行期间,可以改变Name属性值

设窗体上有一个标签Label1 和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True.要求程序运行时每秒在标签中显示一次系统当前时间,以下可以实现上述要求的事件过程是( )

在窗体上绘制一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000,Enadled属性设置为False。程序运行后,如果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序: Private Sub Commandl Click() Timer1.______ End Sub Private Sub Timer_Timer() Text1.Text=Time EA.Enabled=TreeB.Enabled=FalseC.Visible=TreeD.Visible=False

在窗体上有一个文本框控件,名称为TxtTime一个计时器控件,名称为Timer1,要求每1秒钟在文本框中显示一次当前的时间,程序为: Private Sub Timer1 ______() TxtTime. text=Time End Sub 在下划线上应填入的内容是 ______。A.EnabledB.VisibleC.IntervalD.Timer

在窗体上有一个文本框控件,名称为TextTime,一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。 Private Sub Timer1______ TextTime.Text=Time End Sub 在横线上应填入的内容是( )。A.EnabledB.VisibleC.Timer()D.Interval

在窗体上画一个文本框控件,名称为TxtTime;再画一个计时器控件,名称为Timer1,程序运行后,要求每1秒钟在文本框中显示一次当前的事件。以下是实现上述操作的程序,则在下划线后(括号前)应填入的内容是______。 Private Sub Timer1 () TxtTimE.text = Time End SubA.EnabledB.VisibleC.IntervalD.Timer

在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是()A、Timer1.Interval=0.5B、Timer1.Interval=5C、Timer1.Interval=50D、Timer1.Interval=500

在窗体上有一个文本框控件,名称为Txttime:一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间。 程序为: Private Sub Timer1 . Txttime.Text=Time End Sub 下划线应填入的内容是()A、EnabledB、VisibleC、IntervalD、Timer

单选题窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下:以下关于上述程序的叙述中,错误的是(  )。A每执行一次Timer1_Timer事件过程,x的值都在原有基础上增加1BShape1每移动10次回到起点,重新开始C窗体上的Shape1由下而上移动DShape1每次移动100

单选题在窗体上有一个文本框控件,名称为Txttime:一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间。 程序为: Private Sub Timer1 . Txttime.Text=Time End Sub 下划线应填入的内容是()AEnabledBVisibleCIntervalDTimer

单选题在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是()ATimer1.Interval=0.5BTimer1.Interval=5CTimer1.Interval=50DTimer1.Interval=500

单选题在窗体上画一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口中把计时器的Interal属性设置为1000,Enabled属性设置为False。程序运行后,如果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序:在填空处应填入的内容是(  )。AEnabled=TrueBEnabled=FalseCVisible=TrueDVisible=False