Attribute VB_Name = "Variable"
'保存執行SQL語句的字符串
Public SqlStmt As String
'讀取表中列值的變量
Public conn 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 MyTerm As New Terms      '學期對象
Public MyLesson As New Lesson   '課程對象
Public MyScores As New Scores   '成績對象
Public MyArrange As New Arrangement  '課程安排對象
Public MyUser As New Users      '用戶對象
Public CurUser As New Users     '當前用戶對象