vb結(jié)合sql開發(fā)學(xué)校教務(wù)管理系統(tǒng)-wenkub
2022-11-23 16:22:18 本頁面
【正文】 fo=False。, con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub Private Sub Command3_Click() (姓名 ) = (性別 ) = (班級(jí)編號(hào) ) = (民族 ) = Set = rs End Sub Private Sub Command4_Click() delete from 學(xué)生信息表 where 學(xué)號(hào) =39。, conn, adOpenKeyset, adLockOptimistic If Not Then Unload Me 39。 and password =39。Data Source=7MZZQCR4HI4IDQV Exit Function 1: MsgBox End End Function Private Sub Command1_Click() If Trim() And Trim() Then Dim rs As New Recordset select username from tb_user where username =39。 1 程序框圖 ： 學(xué)校教務(wù)管理系統(tǒng)功能結(jié)構(gòu)圖： ‘ 學(xué)校教務(wù)管理系統(tǒng) ER 圖 2 核心程序（ 對(duì)主要的語句要加注 釋 ） 登陸界面截圖： 登陸界面 vb 代碼： Public stu_flag As Integer Public cls_flag As Integer Public course_flag As Integer Public serverstr As String Public ueserstr As String Public passstr As String Public Function conn() As On Error GoTo 1 Set conn = New Provider=。Integrated Security=SSPI。 amp。 amp。關(guān)閉 Else MsgBox 用戶名或密碼不正確 , vbCritical End If 3 Set rs = Nothing Else MsgBox 請(qǐng)輸入用戶名和密碼 , vbCritical End If End Sub Private Sub Command2_Click() 39。 + + 39。Initial Catalog=教學(xué)成績(jī)管理數(shù)據(jù)庫 。 + + 39。Initial Catalog=教學(xué)成績(jī)管理數(shù)據(jù)庫 。 + + 39。Initial Catalog=教學(xué)成績(jī)管理數(shù)據(jù)庫 。 + + 39。Initial Catalog=教學(xué)成績(jī)管理數(shù)據(jù)庫 。 + + 39。Integrated Security=SSPI。 還了解了 怎樣創(chuàng)建 數(shù)據(jù)庫、 創(chuàng)建 表 和對(duì)表的修改插入數(shù)據(jù) 、 創(chuàng)建 視圖 以及 對(duì) 完整性的約束 的知識(shí)點(diǎn) 。Initial Catalog=教學(xué)成績(jī)管理數(shù)據(jù)庫 。 + + 39。 + + 39。Integrated Security=SSPI。
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1