[单选题]

窗体上有1个名称为Textl的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timerl的事件过程如下:

Private Sub Timerl Tliner()

Static flag As Integer

Ifflag=0 Then flag=1

flag=-flag

Ifflag=1 Then

Textl.ForeColor=&HFF& &HFF&为红色

E.lse

Textl.ForeColor=&HC000& &HC000&为绿色

E.nd If

E.nd Sub

以下叙述中正确的是

A.每次执行此事件过程时,flag的初始值均为0

B.flag的值只可能取0或l

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

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

参考答案与解析:

相关试题

在窗体上有一个文本框控件,名称为TextTime;£­£­个计时器控件,名称为T

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

  • 查看答案
  • 在窗体上有一个文本框控件,名称为TxtTime一个计时器控件,名称为Timer1

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

  • 查看答案
  • 在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Time

    [单选题]在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为:Private Sub Timer1_ _________( )TxtTime.text=TimeE.nd Sub在下划线上应填入的内容是A.EnabledB.VisibleC.IntervalD.Timer

  • 查看答案
  • 在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Time

    [单选题]在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timed。要求每一秒在文本框中显示一次当前的时间。程序为: Private Sub Timerl_ ______ TextTime.text=Time End Sub 在下划线上应填入的内容是( )。A.Ena bledB.ViSibleC.IntervalD.Timer

  • 查看答案
  • 在窗体上有一个文本框控件,名称为TextTime,一个计时器控件,名称为Time

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

  • 查看答案
  • 在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Time

    [单选题]在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timerl。要求每一秒在文本框中显示一次当前的时间。程序为:Private Sub Timer1_ ________TxtTime.text=TimeE.nd Sub在下划线上应填入的内容是A.EnabledB.VisibleC.IntervalD.Time

  • 查看答案
  • 在窗体上有一个文本框控件,名称为TxtTime;一个计时器控件,名称为Timer

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

  • 查看答案
  • 在窗体上有一个文本框控件,名称为TxtTime,一个计时器控件,名称为Timer

    [单选题]在窗体上有一个文本框控件,名称为TxtTime,一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间。程序为:Private Sub Timer1_()【】Txt Time.text=TimeEnd Sub在【】中填入合适的事件()A . EnabledB . VisibleC . IntervalD . Timer

  • 查看答案
  • 在窗体上有一个文本框控件,名称为TxtTime,一个计时器控件,名称为Timer

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

  • 查看答案
  • 在窗体上有一个框架框(名称为Frame1),一个计时器(名称为Timerl),计

    [单选题]在窗体上有一个框架框(名称为Frame1),一个计时器(名称为Timerl),计时器的时间间隔属性Interval=100,在图片框中有一个复选按钮(名称为Check1)和一个命令按钮(名称为Command1),用户界面如图1所示。其中,计时器有Timer1_Timer事件过程如下:Private Sub Timer1_Timer( )If Frame1.Left >= Form1.Width Then Frame1.Left = 0F.rame1.Move Frame1.Left + 5

  • 查看答案