填空题
在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1),然后编写如下几个事件过程:
Private SubForm Load()
Timer1.Enabled=False
Timer1.Interval={{U}} {{U}} {{/U}} {{/U}}
End Sub
PrivateSubForm Click()
Timer1.Enabled={{U}} {{U}} {{/U}} {{/U}}
End Sub
Private Sub Timerl Timer()
Label1.Caption={{U}} {{U}} {{/U}} {{/U}}
End Sub
程序运行后,单击窗体,将在标签中显示当前时间,每隔1s变换一次(见图10-11)。请填空。