2. 计算机
  3. “秒表”窗体中有两个按钮（“开始/停止”按钮bOX，“暂停/继续”按钮bPus）；一个显示计时的标签lNum；窗体的“计时器间隔”设为100，计时精度为0.1秒。 要求：打开窗体如图1所示；第一次单击“开始/停止”按钮，从0开始滚动显示计时（见图2）；

“秒表”窗体中有两个按钮（“开始/停止”按钮bOX，“暂停/继续”按钮bPus）；一个显示计时的标签lNum；窗体的“计时器间隔”设为100，计时精度为0.1秒。 要求：打开窗体如图1所示；第一次单击“开始/停止”按钮，从0开始滚动显示计时（见图2）；

admin2011-04-29  44
问题 “秒表”窗体中有两个按钮（“开始/停止”按钮bOX，“暂停/继续”按钮bPus）；一个显示计时的标签lNum；窗体的“计时器间隔”设为100，计时精度为0.1秒。
  要求：打开窗体如图1所示；第一次单击“开始/停止”按钮，从0开始滚动显示计时（见图2）；10秒时单击“暂停/继续”按钮，显示暂停（见图3），但计时还在继续；若20秒后再次单击“暂停/继续”按钮，计时会从30秒开始继续滚动显示；第二次单击“开始/停止”按钮，计时停止，显示最终时间（见图4）。若再次单击“开始/停止”按钮可重新从0开始计时。
   
相关的事件程序如下。请在空白处填入适当的语句，使程序可以完成指定的功能。
    Option Compare Database
    Dim flag，pause As Boolean
Private Sub bOX_Click
    flag=   
  Me! bOX.Enabled=True
  Me!bPus．Enabled=flag
End Sub
Private Sub bPus_Click()
    pause=Not pause
    Me!b0K．Enabled=Not Me!bOK．Enabled
End Sub
Private Sub Form_Open(Cancel As Integer)
    flag=False
    pause=False
    Me!bOK．Enabled=True
    Me!bPus．Enabled=False
End Sub
Private Sub Form Timer()
    Static count AS Single
    If flag=True Then
    If pause=False Then
    Me!lNum．Caption=Round(count，1)
    End If
    count=   
    Else
    count=0
    End If
End Sub
选项
答案NOt flag count+0．1
解析 因为题目要求的计时精度为0．1秒，所以每次count变量的值加0．I。
转载请注明原文地址:https://kaotiyun.com/show/onup777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)