variable.bas

用vb做一个学生管理系统（数据库sql）

Attribute VB_Name = "Variable"

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 MyLesson As New Lessons
Public MyScore As New Scores
Public MyUser As New Users
Public CurUser As New Users