variable.bas

这是一个国内通用的学生管理系统!包括院系,学生基本信息,照片,成绩,课程等多方面的管理系统

Attribute VB_Name = "Variable"
'保存执行SQL语句的字符串
Public SqlStmt As String
'服务器名称
Public ServerName As String
'读取表中列值的变量
Public ColVal As String
'院系班级数组
Public Arr_ClassName() As String
Public Arr_ClassDescribe() As String
Public Arr_ClassId() As Integer
'学生数组
Public Arr_StuId() As Integer
Public Arr_StuName() As String
'声明类模块变量
Public MyStu As New Students
Public CurStu As New Students   '当前学生信息的对象
Public SelStu As New Students   '选择学生信息的对象
Public MyClass As New Classes
Public CurClass As New Classes
Public MyChange As New Change
Public MyEva As New Evaluation
Public MyExp As New Experience
Public MyLesson As New Lessons
Public MyScore As New Scores
Public MyUser As New Users
Public CurUser As New Users