vb+中介管理系统access+开题报告+论文+源代码外文(3)
2013-06-12 01:03
导读:; Picture2(4).Visible = False Picture2(5).Visible = False Picture2(6).Visible = False Picture2(7).Visible = False Picture2(8).Visible = False Picture2(9).Visible = False Picture2(11).Visible = False P
; Picture2(4).Visible = False
Picture2(5).Visible = False
Picture2(6).Visible = False
Picture2(7).Visible = False
Picture2(8).Visible = False
Picture2(9).Visible = False
Picture2(11).Visible = False
Picture2(10).Visible = False
state = "教师信息查询"
For j = 0 To 10
Toolbar1.Buttons(i).Enabled = False
Next j
Case "学生信息管理"
Picture2(2).Visible = True
Picture2(0).Visible = False
Picture2(1).Visible = False
Picture2(3).Visible = False
Picture2(4).Visible = False
Picture2(5).Visible = False
Picture2(6).Visible = False
Picture2(7).Visible = False
(科教作文网http://zw.ΝsΕAc.com发布)
Picture2(8).Visible = False
Picture2(9).Visible = False
Picture2(11).Visible = False
Picture2(10).Visible = False
state = "学生信息管理"
Toolbar1.Buttons(1).Enabled = True
Case "学生信息查询"
Picture2(2).Visible = False
Picture2(0).Visible = False
Picture2(1).Visible = False
Picture2(3).Visible = True
Picture2(4).Visible = False
&n