填空题
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