vb結合sql開發(fā)學校教務管理系統(tǒng)-文庫吧
2024-10-23 16:22 本頁面
【正文】 Command2_Click() 39。退出登錄界面 Unload Me End Sub MDI 主題窗口截圖 ： MDI 主題窗口代碼： Private Sub 刪除成績信息 _Click(Index As Integer) End Sub Private Sub 刪除教師信息 _Click(Index As Integer) End Sub Private Sub 刪除課程信息 _Click(Index As Integer) End Sub Private Sub 刪除學生信息 _Click(Index As Integer) End Sub Private Sub 添加成績信息 _Click(Index As Integer) End Sub 4 Private Sub 添加教師信息 _Click(Index As Integer) End Sub Private Sub 添加課程信息 _Click(Index As Integer) End Sub Private Sub 添加學生信息 _Click(Index As Integer) End Sub Private Sub 退出 _Click(Index As Integer) Unload Me End Sub Private Sub 信息查詢 _Click(Index As Integer) End Sub Private Sub 修改查詢成績信息 _Click(Index As Integer) End Sub Private Sub 修改查詢教師信息 _Click(Index As Integer) End Sub Private Sub 修改查詢課程信息 _Click(Index As Integer) End Sub Private Sub 修改查詢學生信息 _Click(Index As Integer) End Sub 學生信息管理界面： 5 學生信息管理代碼： Dim rs As New Dim con As New Private Sub Command1_Click() (學號 ) = (姓名 ) = (性別 ) = (班級編號 ) = (民族 ) = Set = rs End Sub Private Sub Command2_Click() select * from 學生信息表 where 學號 =39。 + + 39。, con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub Private Sub Command3_Click() (姓名 ) = (性別 ) = (班級編號 ) = (民族 ) = Set = rs End Sub Private Sub Command4_Click() delete from 學生信息表 where 學號 =39。 + + 39。, c
公司管理相關推薦
鄂ICP備17016276號-1