委托代理人按照被代理人的委托行使代理权，法定代理人依照法律的规定行使代理权，指定代理人按照人

“秒表”窗体中有两个按钮(“开始／停止”按钮bOK，“暂停／继续”按钮bPus)；一个显示计时的标签iNure；窗体的“计时器间隔”设为100，计时糟度为0．1秒。

要求：打开窗体如图1所示；第一次单击“开始／停止”按钮，从0开始滚动显示计时(见图2)；10秒时单击“暂停／继续”按钮，显示暂停(见图3)，但计时还在继续：若20秒后再次单击“暂停／继续”按钮，计时会从30秒开始继续滚动显示；第二次单击“开始／停止”按钮，计时停止，显示最终时间(见图4)。若再次单击“开始／停止”按钮可重新从0开始计时。

相关的事件程序如下：

Optioncompare Database

Dim flag，pause As Boolean

PrivateSub bOK_click

flag=__________

Me!bOK．Enabled=True

Me!bPus．Enabled=flag

End Sub

PrivateSub bPus_click

pause=Notpause

Me!bOK．Enabled=Not Me!bOK．Enabled

End Sub

PrivateSub Form. Open(Cancel As Integer)

flag=False

Pause=False

Me!b0K．Enabled=True

Me!bPus．Enabled=False

End Sub

PrivateSub Form. Timer

Staticcount As Single

If flag=TrueThen

Ifpause=False Then

Me!INum．Caption=Round(count,1)

End If

Count=__________

Else

count=0

End If

End Sub

横线处应填写的内容是（）。

A.not flag，count+1

B.not flag，count+0．1

C.enable，count+1

D.enable，sum+1

“秒表”窗体中有两个按钮(“开始／停止”按钮bOK，“暂停／继续”按钮bPus)；一个显示计时的标签iNure；窗体的“计时器间隔”设为100，计时糟度为0．1秒。 要求：打开窗体如图1所示；第一次单击“开始／停止”按钮，从0开始滚动显示计时(见图2)；10秒时单击“暂停／继续”按钮，显示暂停(见图3)，但计时还在继续：若20秒后再次单击“暂停／继续”按钮，计时会从30秒开始继续滚动显示；第二次单击“开始／停止”按钮，计时停止，显示最终时间(见图4)。若再次单击“开始／停止”按钮可重新从0开始计时。相关的事件程序如下： Optioncompare Database Dim flag，pause As Boolean PrivateSub bOK_click flag=__________ Me!bOK．Enabled=True Me!bPus．Enabled=flag End Sub PrivateSub bPus_click pause=Notpause Me!bOK．Enabled=Not Me!bOK．Enabled End Sub PrivateSub Form. Open(Cancel As Integer) flag=False Pause=False Me!b0K．Enabled=True Me!bPus．Enabled=False End Sub PrivateSub Form. Timer Staticcount As Single If flag=TrueThen Ifpause=False Then Me!INum．Caption=Round(count,1) End If Count=__________ Else count=0 End If End Sub 横线处应填写的内容是（）。

A.not flag，count+1

B.not flag，count+0．1

C.enable，sum+1

D.enable，sum+1

“秒表”窗体中有两个按钮（“开始/停止”按钮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

示Form2窗体，程序如下，请补充完整。

Private Sub Disp_Click （）

Me.Hide

Form2. 【10】

End Sub

程的功能是：单击“测试”按钮时，窗体上弹出一个消息框。如果单击消息框的“确定”按钮，隐藏窗体上的“显示”命令按钮；单击“取消”按钮关闭窗体。按照功能要求，将程序补充完整。 Private Sub cmdTest_Click（）

Answer= （“隐藏按钮”，vbOKCancel）

If Answer=vbOK Then

cmdDisplay.Visible=

Else

Docmd.Close

End If

End Sub

窗体上有两个按钮：显示(cmdshow)按钮和测试按钮(cmdtest)，显示按钮初始状态不可见，当单击测试按钮，弹出一个消息框，包括“确定”和“取消”按钮，若单击“确定”则显示“显示”按钮，若单击“取消”则关闭窗体。试将程序补充完整。

Private sub cmdtest_click()

answer = msgbox ("显示按钮", vbOkCancel)

If answer = vbOK then

cmdshow. visible = 【 】

Else

docmd. close

End If

End sub

在窗体中有一个名为(Command1的命令按钮，Click事件的代码如下：

单击命令按钮后，标签显示的结果是()。

在窗体中有一个标签Lbl和一个命令按钮Commandl，事件代码如下：打开窗体后单击命令按钮，窗体中显示的内容是（）。

A. 4

B. 5

C. 10

D. 40

窗体中有两个命令按钮：“显示”(控件名为CmdDisplay)和“测试”(控件名为CmdTest)。单击“测试”按钮时，执行如下事件过程。此事件过程的功能是：当在窗体中出现消息框并选中其中的“确定”按钮时，隐藏“显示”按钮。否则退出。根据题意，请完善下列程序。 Private Sub CmdTest_Click() Answer=【 】 ("隐藏按钮") IF Answer=vbOK then CmdDisplay. visible=【 】 Else End End IF End Sub

。 以下事件过程的功能是：单击 “ 测试 ” 按钮时，窗体上弹出一个消息框。如果单击消息框的 “ 确定 ” 按钮 ，隐藏窗体上的 “ 显示 ” 命令按钮；单击 “ 取消 ” 按钮关闭窗体。按照功能要求，将程序补充完整。

Private Sub cmdTest_Click()

Answer= 【 14 】 （“ 隐藏按钮 ” ， vbOKCancel ）

If Answer=vbOK Then

cmdDisplay.Visible= 【 15 】

Else

Docmd.Close

End If

End Sub