systempublicdata.bas

上机考试系统

Attribute VB_Name = "Module1"
Option Explicit
Public CurrentUserName As String                    '保存当前用户名
Public CurrentUserPwd As String                     '保存当前用户口令
Public CurrentUserType As String                    '保存当前用户身份