module1.bas

来自「学生管理系统是一个学校不可缺少的部分,它的内容对于学校管理者来说是至关重要够为学」· BAS 代码 · 共 21 行

Attribute VB_Name = "Module1"
Sub Main()
jr.Show

jr.Command1.Enabled = False
jr.Label2.Caption = "开始进行初始化....."
Load cz
jr.Label2.Caption = "初始化``````学生交费管理系统查询块；"
Load ll
jr.Label2.Caption = "初始化``````学生交费管理系统交费统览表；"
Load mainn
jr.Label2.Caption = "初始化``````学生交费管理系统主界面；"
Load xg
jr.Label2.Caption = "初始化``````学生交费管理系统数据修改界面；"
Load zj
jr.Label2.Caption = "初始化``````学生交费管理系统数据增加界面；"
jr.Label2.Caption = "初始化``````完成，欢迎使用！"
jr.Command1.Enabled = True
jr.Command1.SetFocus
End Sub