试题12 有一个标题为“登录”的用户登录窗体,窗体上有两个标签,标题分别是“用户名:”和“密码:”,用于输入用户名的文本框名为“UserName”,用于输入密码的文本框名为“UserPassword”,用于进行倒计时显示的文本框名为“Tnum”,窗体上有一个标题为“确认”的按钮名为“OK”,用于输入完用户名和密码后单击此按钮确认。 输入用户名和密码,如用户名或密码错误,则给出提示信息;如正确,则显示“欢迎使用!”信息,要求整个登录过程要在30秒中完成,如果超过30秒还没有完成正确的登录操作,则程序给出提示自动终止整个登录过程。 请在程序空白处填入适当的语句,使程序完成指定的功能。 Option ,Compare Database Dim Second As Integer Private Sub Form_open(Cancel As Integer) Second=0 End Sub Private Sub Form_Timer() If Second > 30 Then MsgBox “请在30秒中登录”, vbcritical, “警告” Docmd.close Else Me!Tnum=30-Second End If Second =___【12】__ End Sub Private Sub OK_Click() If Me.UserName< > “123” Or Me.UserPassword < > “456” Then MsgBox “错误!”+“您还有”& 30-Second & “秒”,vbcritical,“提示” Else Me.TimerInterval=___【13】____ ‘终止Timer事件继续发生 End If End Sub