（1）编辑或添加、删除员工工资信息
作为编辑工资信息这一项，所实现的功能是对公司员工工资信息的存储、计算与编辑，方便对员工工资的管理。当操作员需要对某个员工工资信息进行修改时，可以在“员工工资信息”菜单中找到下拉菜单“整理员工工资”，再按其中的“编辑”按钮可以在即可进行编辑了，编辑完后按“保存”按钮即可。
当操作员进入系统，根据设计要求，需要添加新的员工工资信息时，先找到“计发员工工资”菜单，随后选定工资的计发时间，再选择员工编号或输入员工姓名，会自动显示该员工的所在部门。只需输入该员工的其它工资信息即可完成添加操作。
当操作员需要对某个员工工资信息进行删除时，可以在“整理员工工资”菜单下找到“修改员工工资”窗体，再按“删除”按钮。由于删除记录不可能在大量的数据中盲目的寻找，因此数据删除也有数据查找功能，先在对应的文本框中输入要进行数据删除的条件，再按“删除”按钮，系统便会提示“确定要删除吗”，只要点击“是”即可删除数据。
下图为于员工工资管理编辑窗口：
图5.12员工工资管理编辑窗口
（2）浏览或查询员工工资信息
此窗体亦是能根据员工编号、员工姓名进行员工工资信息的浏览和查询。
图5.13员工工资管理浏览窗口
由于源代码较长，且较为复杂，加之篇幅有限，在此就不做叙述了。
5.6员工工作评价信息管理界面
员工工作评价信息管理是企业考核员工的一项重要参考，内容包括员工姓名、员工所在部门、工作业绩、工作态度、业务水平、备注等。其主要的界面设计如下图所示：
图5.14员工评价窗口
（1）编辑、添加或删除员工评价
方法和前面类似，也是在“工作评价”菜单中找到“添加员工评价”下拉菜单，然后输入相应的员工编号或员工姓名，进行添加或编辑，最后按“保存”按钮即可。此模块对员工的评价的方式还是比较全面的。选择想要删除的员工编号或者输入相应的员工姓名，按“删除”按钮即可删除不需要的信息。其操作的界面如下图所示：
图5.15员工评价编辑、添加窗口
（2）浏览或查询员工评价
此窗体亦可根据输入的员工编号或姓名来查询对应员工的工作评价。
图5.16员工评价查询窗口
因为考虑到代码太长的原因，在这里只给出部分源代码：
Private Sub CmbCode_Change()
If RstWorkRecord.State = adStateOpen Then
RstWorkRecord.Close '//关闭记录集
End If
RstWorkRecord.Open "select *from 员工档案 where 员工编号='" & CmbCode.Text & "' ", DBCON, adOpenKeyset, adLockOptimistic, adCmdText
TxtName.Text = RstWorkRecord.Fields(1).Value '//给文本框赋值
TxtBranch.Text = RstWorkRecord.Fields(16).Value
End Sub
Private Sub CmdRetrun_Click()
Unload Me
End Sub
Private Sub Form_Load()
Me.Left = Frmmdimain.Width / 5
Me.Top = 200
WinXPWorkComment.InitSubClassing
If RsWorkRecord.State = adStateOpen Then
RsWorkRecord.Close
End If
RsWorkRecord.Open "员工评价", DBCON, adOpenKeyset, adLockOptimistic, adCmdTable
If RsWorkRecord.RecordCount > 0 Then
Call FormTxtValue1
Else
Call FormTxtValue2
End If
End Sub
5.7系统设置模块
系统设置模块里包括密码设置、用户管理。用户管理功能只对管理员开放，管理员能在用户管理窗体中添加新的用户，对已有的用户进行用户名和密码修改，或者将原有用户删除。当一般用户和操作员进入时，无法进行相应操作。系统设置中的每个小模块都相应地有操作界面的截图，具体如下：
（1） 密码设置
图5.17修改密码窗口
该界面比较简单，能让登陆的用户修改自己的密码，但不能更改用户名，此项对所有权限的用户都适用。一进入此窗体便会显示此用户名，在旧密码框中输入原始密码，在新密码框中输入想更改的新密码，按确认按钮便可修改用户密码。
（2） 用户管理