问题
填空题
有“数字时钟”窗体如下:
在窗口中有“[开/关]时钟”按钮,单击该按钮可以显示或隐藏时钟。其中按钮的名称为“开关”,显示时间的文本框名称为“时钟”,计时器间隔已设置为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)处填()
答案
参考答案:flag=1
解析:
题面要求单击该按钮可以显示或隐藏时钟,在本程序中,变量flag的值有两个:0或1,作用是反应按钮的开关状态。根据子过程Form_Load()可以知道,flag的初始值为1,下面看子过程开关Click()。根据程序中的If-Else语句可以知道,当变量flag=1时,执行“时钟.Visible=False”语句,将时钟的Visible属性设置为False,并将flag的值改为0;如果变量flag=0时,则执行“时钟.visible=True”语句,将时钟的Visible属性设置为True,并将flag的值改为1。因此,本空填“flag=1”。