【正文】 立聯(lián)系，因而先不考慮。班級(jí)與學(xué)生這兩個(gè)實(shí)體是多對(duì)多聯(lián)系；一位學(xué)生要學(xué)習(xí)多門班級(jí)，一門班級(jí)有多位學(xué)生共同學(xué)習(xí)。而學(xué)習(xí)作業(yè)是這兩個(gè)實(shí)體“學(xué)生”和“作業(yè)”共有的屬性，應(yīng)填在二者的聯(lián)系“學(xué)習(xí)”邊。這個(gè)ER圖可畫成下圖。圖47 作業(yè)管理系統(tǒng)中學(xué)生與班級(jí)的ER圖教師與班級(jí)這兩個(gè)實(shí)體之間，是一對(duì)多聯(lián)系；一位教師可以都多個(gè)班級(jí)，而一門班級(jí)對(duì)于學(xué)生作業(yè)來說只能有一位教師(英語、高等數(shù)學(xué)有多位教師教，但對(duì)某個(gè)固定的學(xué)生來說只能有一位教師)。其ER圖，如下所示。圖48 教師與班級(jí)的ER圖教師與班級(jí)的ER圖組合到一起，得到最后的ER圖，有了ER圖，就可以設(shè)計(jì)數(shù)據(jù)庫(kù)。下圖為數(shù)據(jù)模型圖。圖49 數(shù)據(jù)模型圖5 系統(tǒng)設(shè)計(jì) 軟件模塊結(jié)構(gòu)設(shè)計(jì) 系統(tǒng)方案確定通過對(duì)系統(tǒng)的調(diào)研與分析，系統(tǒng)主要應(yīng)完成的功能有：班級(jí)管理、學(xué)生作業(yè)管理、系統(tǒng)管理等功能。 軟件結(jié)構(gòu)設(shè)計(jì)本系統(tǒng)在執(zhí)行時(shí)，先根據(jù)不同的操作人員的需要來進(jìn)行相應(yīng)的模塊，然后可以輸入數(shù)據(jù)或者進(jìn)行其它的查詢或?yàn)g覽等操作；總體來說，本系統(tǒng)屬于一個(gè)事務(wù)型管理系統(tǒng)。圖51 結(jié)構(gòu)設(shè)計(jì)圖 數(shù)據(jù)庫(kù)設(shè)計(jì)數(shù)據(jù)庫(kù)采用了Microsoft推出的SQL數(shù)據(jù)庫(kù)，這是微軟集成到Office中的一個(gè)桌面數(shù)據(jù)庫(kù)，能夠快速方便的和Office的其他套件綜合使用。由于SQL具有顯著的簡(jiǎn)易性和有效性，大量的桌面數(shù)據(jù)庫(kù)系統(tǒng)都采用SQL作為后臺(tái)數(shù)據(jù)庫(kù)。使用SQL的好處還在于，如果你的系統(tǒng)擴(kuò)展到Client/Server模式的時(shí)候，可以使用Microsoft的數(shù)據(jù)庫(kù)服務(wù)器軟件SQL Server，此時(shí)，程序只需要簡(jiǎn)單的修改一下鏈接（ADO的數(shù)據(jù)源）就可以，這樣，為程序的平滑擴(kuò)展提供了非常有力的條件?；緮?shù)據(jù)表設(shè)計(jì)以及權(quán)限設(shè)置如下：圖52 Class_student關(guān)聯(lián)學(xué)生和班級(jí)的，學(xué)生的學(xué)號(hào)作為本表的主鍵。圖53 Exercise_infor存放作業(yè)基本信息的表，練習(xí)號(hào)作為主鍵。圖54 Exercise_update作業(yè)基本信息的更新表，學(xué)生的學(xué)號(hào)作為主鍵。圖55 Notice_infor通知信息表，通知號(hào)作為主鍵。圖56 Student_infor學(xué)生信息表，學(xué)生的學(xué)號(hào)作為主鍵。圖57 Student_login學(xué)生注冊(cè)信息表，學(xué)生的學(xué)號(hào)作為主鍵。圖58 teacher_login教師登錄信息表，教師號(hào)作為主鍵。數(shù)據(jù)表selectInsertupdatedeleteStudent_infor√√Student_login√√√Class_student√√√√N(yùn)otice_infor√Exercise_update√√√√Student_mark√Lab_infor√Exercise_infor√圖59 學(xué)生權(quán)限表數(shù)據(jù)表selectInsertupdatedeleteStudent_infor√√√√Student_login√√√√Class_student√√√√N(yùn)otice_infor√√√√Exercise_update√√√√Student_mark√√√√Mark_rate√√√√Teacher_login√√√√Lab_infor√√√√Exercise_infor√√√√圖510教師權(quán)限表6 系統(tǒng)功能的實(shí)現(xiàn) 系統(tǒng)登錄圖61系統(tǒng)登錄界面本系統(tǒng)登錄身份有兩種：學(xué)生和教師。在下拉框中可以選擇教師登錄。Select Case strTableName//根據(jù)選擇的用戶不同，用case來選擇用戶Case student_login =(DSN_student)//設(shè)置數(shù)據(jù)庫(kù)連接字符串 strID = s_id str_PW = sl_pwd strPath = ../network_course/student/ strUserIdent = 同學(xué)Case teacher_login = (DSN_teacher)//設(shè)置數(shù)據(jù)庫(kù)連接字符串 strID = T_id str_PW = TL_pwd strPath = ../network_course/teacher/ strUserIdent = 老師End Select 以上代碼是處理下拉菜單選擇學(xué)生或老師的問題，以及設(shè)置字段名和頁(yè)面跳轉(zhuǎn)字符串。 = select * from + strTableName + where + strID + =39。 amp。 amp。 39。 39。查詢語句Try () //打開數(shù)據(jù)庫(kù)連接 Dim reader As IDataReader reader = () strpassword = If Then strRealPw = (str_PW) If Trim(strpassword) = Trim(strRealPw) Then //比較密碼和輸入 bool1 = false Else = 密碼錯(cuò)誤! bool1 = False End If Else = 用戶名輸入錯(cuò)誤 bool1 = true End If () Catch = 數(shù)據(jù)庫(kù)操作失敗，可能是服務(wù)器出現(xiàn)錯(cuò)誤，請(qǐng)稍后再試! Finally () strpassword = strRealPw = End Try以上代碼是驗(yàn)證用戶ID和密碼。兩個(gè)對(duì)象主體使用同一個(gè)驗(yàn)證，代碼簡(jiǎn)便易懂。 學(xué)生注冊(cè)圖62 學(xué)生注冊(cè)界面Dim dsn As String = (DSN_student)//設(shè)置數(shù)據(jù)庫(kù)連接字符串Dim conn As New = dsnDim cmd As IDbCommand = () If Then //頁(yè)面驗(yàn)證成功 = select * from student_infor where s_id=39。 + + 39。Try () Dim reader As IDataReader reader = () If Then 39。如果有此賬號(hào) //比較填寫的真實(shí)姓名一欄的值和數(shù)據(jù)庫(kù)表項(xiàng)中的s_name內(nèi)容 If Trim() = Trim((s_name)) Then If (s_iflogin) = True Then 39。s_iflogin//字段表示學(xué)生是否已經(jīng)注冊(cè) = 該用戶已經(jīng)注冊(cè) Else bool1 = True = End If Else = 您所輸入的號(hào)碼和姓名不匹配，請(qǐng)重新填寫 End If Else = 你所輸入的學(xué)號(hào)，請(qǐng)重新填寫 End If ()Catch = 數(shù)據(jù)庫(kù)操作失敗，可能是服務(wù)器出現(xiàn)錯(cuò)誤，請(qǐng)稍后再試！Finally ()End TryElse = 頁(yè)面有錯(cuò)誤End If //sql2表示插入語句中values中的值 Dim sql2 As String = 39。 + + 39。,39。 + + 39。,39。 + + 39。,39。 + + 39。,39。 + + 39。,39。 + + 39。,39。 + + 39。,39。 + + 39。If bool1 Then 39。如果此用戶賬號(hào)存在、并且未注冊(cè) bool1 = False //插入注冊(cè)信息 = insert into student_login (S_ID,SL_RNAME,SL_NAME,SL_Pwd,SL_Date,SL_,SL_phone,SL_memo) values ( + sql2 + ) Try () () bool2 = True Catch = 數(shù)據(jù)庫(kù)操作失敗，可能是服務(wù)器出現(xiàn)錯(cuò)誤，請(qǐng)稍后再試！ bool2 = False Finally () End Try If bool2 Then 39。判斷在注冊(cè)是是否出現(xiàn)意外情況， //將student_infor的對(duì)應(yīng)項(xiàng)的s_iflogin置為,表示已經(jīng)注冊(cè)過了 = UPDATE student_infor SET s_iflogin = 39。139。 WHERE (s_id = 39。 + + 39。) Try () () Catch = 數(shù)據(jù)庫(kù)操作失敗，可能是服務(wù)器出現(xiàn)錯(cuò)誤，請(qǐng)稍后再試！ Finally () End Try //顯示注冊(cè)成功信息 = False = True End IfEnd If 學(xué)生用戶圖63 學(xué)生用戶界面Dim student_id As String = (userInf).Values(userID)If = 6 And 12 Then = 早上好， amp。 (userInf).Values(userID) amp。 (userInf).Values(userIdent)ElseIf = 12 And 18 Then = 下午好， amp。 (userInf).Values(userID) amp。 (userInf).Values(userIdent)Else = 晚上好， amp。 (userInf).Values(userID) amp。 (userInf).Values(userIdent)End IfDim dsn As String = (DSN_student)Dim conn As New = dsnDim cmd As New = connDim ds1 As DataSet = New DataSetDim mydap1 As New = select top 10* from notice_inf