variable.bas

银行设备管理系统,采用VB+SQL实现,包含源程序及数据库备份,完美运行,完整无缺.

Attribute VB_Name = "Variable"
'保存执行SQL语句的字符串
Public SqlStmt As String
'类模块对象
Public MyBase As New BaseInfo            '基本信息对象
Public MyDevice As New Devices           '设备对象
Public MyDeviceSel As New Devices        '选择的设备对象
Public MyMaintenance As New Maintenance  '设备维护对象
Public MyDiscard As New Discard          '报废对象
Public MyCheck As New Check              '巡检对象
Public MyMove As New Movement            '移机对象
Public MyUser As New Users               '用户对象
Public CurUser As New Users              '当前用户对象