2007年上半年程序员下午试卷[5]

软考 责任编辑:m348568485 2007-08-03

添加老师微信

备考咨询

加我微信

摘要:试题五(共15分)阅读以下应用说明以及用VisualBasic开发过程中所编写的程序代码,将应填入_(n)处的字句写在答题纸的对应栏内。[应用说明]某应用的登录界面如下:登录界面中的文本框txtUserID和txtPassword分别用于接受用户输入的用户名和口令,命令按钮为确定(cmdOk)和取消(cmdCancel)。ADO数据控件Adodc1

试题五(共15 分)

阅读以下应用说明以及用 Visual Basic 开发过程中所编写的程序代码,将应填入_(n)处的字句写在答题纸的对应栏内。

[应用说明]

某应用的登录界面如下:

 

登录界面中的文本框 txtUserID 和 txtPassword 分别用于接受用户输入的用户名和口令,命令按钮为确定(cmdOk)和取消(cmdCancel) 。ADO 数据控件 Adodc1 与数据库EmployeeData 连接。在 EmployeeData 中,表“Users”的字段“UserID”和“Pswd”分别记录了所有的合法用户名和口令。

在登录界面中,输入正确的用户名和口令并单击“确定”按钮后,就会打开应用程序的主窗口 frmApp。用户名或密码输入错误时,给出提示信息并返回登录界面。

[Visual Basic 程序代码]

Private Sub cmdOK_Click()

 Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data

Source=D:\data\EmployeeData.mdb;Persist Security Info=False"

Adodc1.RecordSource = "select *(1) "

Adodc1.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

[1]  [2]  [3]  [4]  [5]  [6]  [7]  [8]  

更多资料
更多课程
更多真题
温馨提示:因考试政策、内容不断变化与调整,本网站提供的以上信息仅供参考,如有异议,请考生以权威部门公布的内容为准!

软考备考资料免费领取

去领取

!
咨询在线老师!