有“数字时钟”窗体如下:
在窗口中有“[开/关]时钟”按钮,单击该按钮可以显示或隐藏时钟。其中按钮的名称为“开关”,显示时间的文本框名称为“时钟”,计时器间隔已设置为500。
请在空白处填入适当的语句,使程序可以完成指定的功能。
DimflagAsInteger
PrivateSubForm_Load()
flag=1
EndSub
PrivateSubFormTimer()’“计时器触发”事件过程
时钟=Time’在“时钟”文本框中显示当前时间
EndSub
PrivateSub开关_Click()’“开关”按钮的单击事件过程
If(1)Then
时钟.Visible=False
flag=0
Else
时钟.Visible=True
flag=1
EndIf
EndSub
(1)处填()