vb+中介管理系统access+开题报告+论文+源代码外文翻译+答辩ppt

;          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
            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

首页上一页 1 2 3 4 5 6 7 下一页尾页 3/9/9

vb+中介管理系统access+开题报告+论文+源代码外文翻译+答辩ppt(三)