modvar.bas

来自「sql的实例源码」· BAS 代码 · 共 20 行

Attribute VB_Name = "modVar"
'定义变量
Public IsAdd As Boolean                       '是否为增加操作，否的时候为修改操作
Public WageItemID As Integer                  '工资项目编号

'声明自定义类的对象
Public objPasswd As New PasswdInfo            'PasswdInfo表对象
Public objCurPasswd As New PasswdInfo         '当前PasswdInfo表对象
Public objDept As New DeptInfo                'DeptInfo表对象
Public objEmployeeInfo As New EmployeeInfo    'EmployeeInfo表对象
Public objRewardInfo As New RewardInfo        'RewardInfo表对象
Public objRewardType As New RewardType        'RewardType表对象
Public objMissionType As New MissionType      'MissionType表对象
Public objDutyType As New DutyType            'DutyType表对象
Public objLevelType As New LevelType          'LevelType表对象
Public objPostType As New PostType            'PostType表对象
Public objWageInfo As New WageInfo            'WageInfo表对象
Public objWageProvide As New WageProvide      'WageProvide表对象