计算机毕业设计前台介绍:
4.1 用户登陆界面
运行系统显示用户登录界面,输入登录名、密码才能进行下一步的操作。系统会通过登陆名和密码来识别用户身份的真假,经过正确的识别后,用户才能对其进行操作。
以下是引用片段:
代码设计如下: Private Sub MMButton_XPBE2_Click() '判断登录名和密码 Dim tmprs As New ADODB.Recordset Set tmprs = ExecSql("select * from czyxx where czydlm='" & Me.Text3(0).Text & "' and czykl = '" & Me.Text3(1).Text & "'") With tmprs If .RecordCount > 0 Then frmMain.gczyxm = .Fields("czyxm").Value frmMain.gczydlm = .Fields("czydlm").Value frmMain.gczykl = .Fields("czykl").Value log = InsertOperateLog("进入系统", "成功") Unload Me frmMain.Show Else MsgBox "登陆名或密码错误" End If End With End Sub
Private Sub MMButton_XPBE4_Click() '结束程序 Unload Me End Sub
Private Sub Text3_KeyPress(Index As Integer, KeyAscii As Integer) '回车键换焦点 If KeyAscii = 13 Then If Index = 0 Then Me.Text3(1).SetFocus If Index = 1 Then Call MMButton_XPBE2_Click End If End Sub
|
〖资料来源:计算机毕业论文 www.xiaoniu168.com〗
第7页为计算机毕业论文部分......