rao_anuo的博客

vb编写的简单学生成绩查询系统 Sub pingbi3() Form10.Command4.Visible = False End Sub Sub pingbi1() Form2.修改.Visible = False Form2.添加.Visible = False Form2.删除.Visible = False End Sub Sub pingbi2() Form10.Command2.Visible = False End Sub Private Sub 管理员_Click() Unload Me Form9.Show pingbi3 End Sub Private Sub 取消_Click() End End Sub Private Sub 退出_Click() End End Sub Private Sub 学生_Click() Unload Me Form10.Visible = True pingbi1 pingbi2 Form10.Command4.Visible = True End Sub