mymodule.bas

学生信息的管理是学校经常遇到的问题。学生数量的积聚增加和学生认识制度的改革

Attribute VB_Name = "MyFirstModule"
Option Explicit

Public UserID As String '存储本次登陆的用户编号
'Public ok  As Boolean     '存储登陆校验是否通过
Public times As Integer   '存储用户试图登陆的次数
Public finded As Boolean  '存储查询的学生是否查到

Sub Main()
    frm_login.Show
End Sub