modmnuctr.bas

来自「教务管理系统,用VB 完成,以SQL SERVER 2000作为后台数据库」· BAS 代码 · 共 15 行

Attribute VB_Name = "ModMnuCtr"
Option Explicit

  Public Kubiao_Xuanze As Integer
 
  Public DB As Database
  Public Rc As Recordset

  Public BasField(1 To 7) As String
  Public BasFldCnt(1 To 7) As Integer

  Public WhoLdXuehao As Integer

  Public XuehaoLD As Boolean