在窗体上画一个标签（名称为label1）和一个计时器（名称为timer1），然后编写如下几个事件过程：。程序运行后，单击窗体，将在标签中显示当前时间，每隔1秒钟变换1次。

Private sub form_load( )

    Timer1.enabled=false

    Timer1.interval=

End sub

Private sub form_click( )

    Timer1.enabled=

End sub

Private sub timer1_timer( )

    Label1.caption=time

End sub