阅读以下应用说明以及用Visual Basic开发过程中所编写的程序代码,将应填入(n)处的字句写在对应栏内。 【应用说明】 某应用的登录界面如下: 登录界面中的文本框txtUserID和txtPassword分别用于接受用户输入的用户名和口令,命令按钮为“确定(cmdOk)”和“取消(cmdCancel)”。ADO数据控件Adodc1与数据库EmployeeData连接。在EmployeeData中,表“Users”的字段“UserID”和“Pswd”分别记录了所有的合法用户名和口令。 在登录界面中,输入正确的用户名和口令并单击“确定”按钮后,就会打开应用程序的主窗口fxmApp。用户名或密码输入错误时,给出提示信息并返回登录界面。 【Visual Basic程序代码】 Private Sub cmdOK Click() Adodcl.ConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:/data/EmployeeData.mdb;Persist Security Info=False' Adodcl.RecordSource = 'select *(1)' Adodcl.Refresh Do usrname =(2) pwd = Adodc1.Recordset('Pswd') Adodc1.Recordset.MoveNext Loop Until (usrname =(3)) Or (Adodc1.Recordset.EOF) If usrname <> txtUserID.Text Then MsgBox '无效的用户ID, 请重新输入!', , '提示信息' Else If (4)Then MsgBox '欢迎进入系统主界面!', , '提示信息' Unload me (5) Else MsgBox '无效的用户密码, 请重新输入!', , '提示信息' End If End If End Sub