现有一个登录窗体如下图所示。打开窗体后输入用户名和密码，登录操作要求在20秒内完成，如果在20秒内没有完成登录操作，则倒计时到达0秒时自动关闭登录窗体，窗体的右上角是显示倒计时的文本框Itime。事件代码如下，要求填空完成事件过程。
Option Compare Database
Dim flag As Boolean
Dim i As Integer
Private Sub Form_Load()
flag=______
Me．Timednterval=1000
i=0
End Sub
Private Sub Form_Timer()
If flag=True And i＜20 Then
Me!Time.Caption=20-i
i=______
Else
DoCmd．Close
End If
End Sub
Private Sub ok_Click()
登录程序略
如果用户名和密码输入正确，则flag=False
End Sub
