If Txt1.Text = \
mysqls = \
If Cmb2.Text = \等于\
mysqls = mysqls + Cmb1.Text + \ ElseIf Cmb2.Text = \相似\
mysqls = mysqls + Cmb1.Text + \ Else
mysqls = mysqls + Cmb1.Text + Cmb2.Text + Txt1.Text
End If
If Frame1.Enabled = True Then
str = \
If Optsex(1).Value Then
str = \性别=\男\ ElseIf Optsex(2) Then
str = \性别=\女\ End If End If
mysqls = mysqls + str
If Not Opt(0) Then
If Opt(1).Value Then str = \
ElseIf Opt(2).Value Then str = \ End If
mysqls = mysqls + str + Cmb3.Text
If Cmb2.Text = \等于\
mysqls = mysqls + \ ElseIf Cmb2.Text = \相似\
mysqls = mysqls + \ Else
mysqls = mysqls + Cmb4.Text + Txt2.Text End If
15
End If
FrmMain.DataA.RecordSource = mysqls On Error GoTo exp: Txtsql.Text = mysqls FrmMain.DataA.Refresh Exit Sub exp:
Txtsql.Text = \搜索语句错误：\
End Sub
2、系统测试
为了确保本系统能够正常运行，需要在发布之后做一次较全面的测试。现将具体操作及过程举例说明如下： 2.1测试举例
（1）.测试用户登陆是否成功：
打开人事管理系统，在“用户名”里填入root，“密码”框里我们填入root作为用户登录密码。填写完成点击“确定”按钮，将会出现操作程序页面，即该用户已经登陆成功了。再运行程序，会有提示页面出现：程序已经运行，不能再次装载！ （2）.测试其他用户是否能够登录：
打开人事管理系统登录页面，输入任意密码，点击“登录”按钮。将出现密码出错提示页面。然后点“确定”返回人事管理系统登录页面。 （3）.测试编辑功能是否成功：
编辑功能：在登录成功之后，即可进入相应的管理页面，点击“编辑”，即出现编辑页面，即可以修改和删除员工的个人信息资料。最后保存。 （4）.测试查询功能是否成功：