variable.bas

来自「售后服务管理系统,采用VB+SQL实现,包含源程序及数据库备份,完美运行,完整无」· BAS 代码 · 共 13 行

Attribute VB_Name = "Variable"
'保存执行SQL语句的字符串
Public SqlStmt As String
'类模块的对象
Public MyPro As New SrvProblem  '问题记录对象
Public MyDespatch As New SrvDespatch  '问题分配对象
Public MyTask As New SrvTask  '任务记录对象
Public MyInv As New SrvInvestigate  '调查记录对象
Public MyFaq As New SrvFaq '常见问题对象
Public MyBase As New BaseInfo  '类型对象
Public MyUser As New Users  '用户对象
Public CurUser As New Users  '当前用户对象