[填空题] 在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1),如图16-11所示,然后编写如下几个事件过程: Private Sub Form_Load() Tim

10 查阅

[填空题] 在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1),如图16-11所示,然后编写如下几个事件过程:

Private Sub Form_Load()

Timer1. Enabled=False

Timer1. Interval= 【8】

End Sub

Private Sub Form_Cliek()

Timer1. Enabled= 【9】

End Sub

Private Sub Timer1_Timer()

Label1. Caption= 【10】

End Sub

程序运行后,单击窗体,将在标签中显示当前时间,每隔1秒钟改变一次。请填空。

参考答案:

[8]1000 [9]True或任何非0数值 [10]Time或Time$解析:[分析]: 根据题意:将Interval属性为1 000毫秒;在单击窗体后,为了能使计数器有效,应该将Enabled设置为True或任何非0数值。Time函数来显示系统时间,此函数返回一个Varianr,以日期/时间数值(VarType 7)的形式包含当前时间。将它赋予某个字符串变量或属性时,比如赋予本题中Label1标签的Caption属性时,Visual Basic将用“控制面板”中指定的格式将其转换成一个字符串。

计算机考试