题目：
现有一个登录窗体如下图所示。打开窗体后输入用户名和密码，登录操作要求在20秒内完成，如果在20秒内没有完成登陆操作，则倒计时达到0秒时自动关闭本窗体，窗体的右上角是显示倒计时的标签labtime。事件代码如下，要求填空完成事件过程。
Dim flag As Boolean
Dim i As Integer
Private Sub Form_Load()
flag=______
Me.TimerInterval=1000
i=0
End Sub
Private Sub Form_Timer()
If flag=True And i＜20 Then
Me!labtime.Caption=20-i
i=______
Else
DoCmd.Close
End If
End Sub
Private Sub OK_Click()
’登录程序略
’如果用户名和密码输入正确，则：falg=False
End Sub
答案：
参考答案：True i+1
解析： 本题考查VBA编程和计时器的使用知识。在窗体属性中有一个计时器时间间隔属性，该属性默认为“0”表示计时器未启用。一旦将其设置为非0值，将会扁用计时器，每隔指定的时间间隔自动执行计时器事件。窗体的计时器事件的过程名为Form Timer()，该事件在本题中用于完成20秒倒计时功能，由于TimerInterval属性值为1000，所以Form Timer()事件每1000毫秒即每秒被自动执行一次。在此事件中，计时器工作的条件是“flag=True”且“i＜20”，所以flag标记应被初始化为true，故本题第一空填“true”。变量“i”用于记录用户打开登录操作窗体后已经进行的秒数，所以在每隔一秒后i的值应该加1，故本题第二空应填“i+1”。
