问题
填空题
在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1),然后编写如下几个事件过程:
Private Sub Form_Load( )
Timer1.Enabled=False
Timer1.Interval= 【6】
End Sub
Private Sub Form_Click( )
Timer1.Enabled= 【7】
End Sub
Private Sub Timer1_Timer( )
Label1.Caption= 【8】
End Sub
程序运行后,单击窗体,将在标签中显示当前时间,每隔1秒钟变换一次(见图)。请填空。
答案
参考答案:[6]1000
[7] True或任何非0数值
[8] Time或Time$
解析: Interval是计时器最重要的属性,用来设置一定的时间间隔用来触发Timer事件。Interval以毫秒为单位,设为1000时表示1秒,根据题意,第6空填1000。第7个空,本处表达的意思是当单击窗体时,Timer1的功能被启动,故本处填True,也可以填任何非0数值。因为在Visual Basic中数值0表示False,非0值都可以表示True。根据题意,[8]需要把当前时间赋给Label1的Caption属性,故[8]填Time或Time$。该函数返回当前时间。