variable.bas

这是一个企业版的人力资源管理源码,很适合初级开发人员

Attribute VB_Name = "Variable"
'保存执行SQL语句的字符串
Public SqlStmt As String
'服务器名称
Public ServerName As String
'读取表中列值的变量
Public ColVal As String
'部门数组
Public Arr_DepName() As String
Public Arr_DepDescribe() As String
Public Arr_DepId() As Integer
'员工数组
Public Arr_EmpId() As Integer
'声明类模块变量
Public MyEmp As New Employees
Public CurEmp As New Employees   '当前员工信息
Public UpperEmp As New Employees '选择的上级员工信息
Public MyDep As New Department
Public CurDep As New Department
Public MyCheck As New CheckIn
Public MyEva As New Evaluation
Public MyExp As New Experience
Public MyFam As New FamilyMember
Public MySal As New Salary
Public MyRule As New SalaryRules
Public MyUser As New Users
Public CurUser As New Users