試卷生成與題庫管理系統(tǒng)畢業(yè)論文vc++

1、試卷生成與題庫管理系統(tǒng)開發(fā)工具和技術(shù)本系統(tǒng)使用 Visual C+ 6.0 作為開發(fā)軟件，后臺使用 SQL Server 2000 作為本系統(tǒng)的數(shù)據(jù)庫，對于數(shù)據(jù)庫的訪問操作采用 ADO技術(shù)，從而實現(xiàn)系統(tǒng)邏輯功能。系統(tǒng)需求分析系統(tǒng)主要針對教師對試題的管理需求和對試卷的生成及管理需求。主要功能如下。1. 用戶登錄模塊身份驗證，讀取數(shù)據(jù)庫中用戶信息，驗證用戶的登錄方式、用戶名及密碼，全部通過則進(jìn)入系統(tǒng)，如果三次登錄失敗則退出系統(tǒng)。2. 抽取現(xiàn)有試卷模塊抽取現(xiàn)有試卷（面向所有用戶） ，用戶可以瀏覽權(quán)限范圍內(nèi)的科目的所有試卷及答案，包括已組試卷和導(dǎo)入的成套試卷，可以導(dǎo)入成套試卷及答案。3. 自動組卷模塊

2、自動組卷（面向所有用戶） ，用戶可以對權(quán)限范圍內(nèi)的科目進(jìn)行自動組卷。選定科目后，選擇共需幾道大題、試卷的總分值、每道大題的題型、每大題包含小題的數(shù)量及每道大題的分值（以上為必選） ；對于每道大題可以進(jìn)入“選擇題目范圍及難度”模塊對題目進(jìn)行范圍和難度的限制（可選） 。組卷后選擇是否保存試卷。試卷生成后可以將試卷和答案導(dǎo)出至 word 文檔。再次選定科目后清除上一次的顯示結(jié)果進(jìn)入下一次的自動組卷模式。4. 手動組卷模塊手動組卷（面向所有用戶） ，用戶可以對權(quán)限范圍內(nèi)的科目進(jìn)行手動組卷。選定科目后，選擇共需幾道大題、試卷的總分值、每道大題的題型、每大題包含小題的數(shù)量及每道大題的分值；對于每道大題需進(jìn)

3、入“選擇試題”模塊瀏覽試題庫中的對應(yīng)題型從中手動選擇所需試題。由于題庫中題量較大，可以通過分類查詢及精確查詢篩選試題進(jìn)行查看，亦可將試題導(dǎo)出至 word 文檔進(jìn)行瀏覽，選擇試題完畢后保存回到“手動組卷”模塊。 （以上全部為必須操作）。組卷后選擇是否保存試卷。試卷生成后可以將試卷和答案導(dǎo)出至 word 文檔。再次選定科目后清除上一次的顯示結(jié)果自動進(jìn)入下一次的手動組卷模式。5. 試卷管理模塊試卷管理（面向管理員） ，一般管理員僅可以對自己組成及導(dǎo)入的試卷進(jìn)行管理，系統(tǒng)管理員可以管理全部科目中的全部試卷。功能包括：瀏覽試卷、刪除試卷、修改答案。其中在“瀏覽試卷”模塊和“修改答案”模塊中可以將試卷及答

4、案導(dǎo)出至 word 文檔進(jìn)行查看及修改。6. 試題管理模塊試題管理（面向管理員） ，一般管理員僅可以對權(quán)限范圍內(nèi)的科目的試題進(jìn)行管理，系統(tǒng)管理員可以管理全部科目中的全部試題。功能包括：瀏覽試題、導(dǎo)出試題至 word 文檔查看、查詢試題（分為條件查詢和精確查詢） 、成批（從 word）導(dǎo)入試題、逐道添加試題、刪除試題、修改試題、清空試題。7. 題型管理模塊題型管理（面向管理員） ，一般管理員和系統(tǒng)管理員均可對題型進(jìn)行管理。功能包括：添加新題型和刪除已有題型。8. 科目管理模塊科目管理（面向系統(tǒng)管理員） ，只有系統(tǒng)管理員可以對科目進(jìn)行管理。功能包括：添加新科目和刪除已有科目。9. 修改密碼模塊修改

5、密碼（面向所有用戶） ，所有用戶登錄后均可對自己的密碼進(jìn)行修改，保存修改后下一次登錄以新密碼為準(zhǔn)。系統(tǒng)總體設(shè)計本系統(tǒng)的兩大主要功能為：題庫功能和試卷功能。由此將系統(tǒng)劃分為八大模塊，分別為：試題管理、題型管理、科目管理、抽取現(xiàn)有試卷、自動組卷、手動組卷、試卷管理和修改密碼。功能模塊設(shè)計試卷生成與題庫管理系統(tǒng)的主要功能是為使用者提供一個簡單快捷的試題錄入、查詢、瀏覽，快速組卷及試卷管理的軟件系統(tǒng)。同時降低在查找試題上的工作難度，節(jié)省時間，也方便了設(shè)置試卷難度，并提供保存和查看組成試卷和成套導(dǎo)入的試卷的功能。系統(tǒng)模塊分為以下幾個部分，如圖3.1 所示。主控界面題庫功能試卷功能密碼管理抽修改試題科取自

6、手試密題型目現(xiàn)動動卷碼管管管有組組管理理理試卷卷理卷隨手添刪添刪預(yù)成機(jī)動預(yù)修刪抽選添修刪保除除覽套覽改除加加取擇加改除存現(xiàn)現(xiàn)現(xiàn)導(dǎo)現(xiàn)試現(xiàn)新新試試試試試試有有有入有卷有題科題題題題題題題科試試試答試型目組組型目卷卷卷案卷卷卷及及答答案案逐成逐道批道清添導(dǎo)刪空加入除試試試試題題題題圖 3.1模塊圖設(shè)計流程下面著重介紹一下登錄模塊的搭建過程。安裝本系統(tǒng)后，打開程序，先進(jìn)入歡迎界面，點擊“登錄系統(tǒng)” ，進(jìn)入登錄界面。1. 結(jié)構(gòu)圖登錄模塊結(jié)構(gòu)圖如圖3.2 所示。歡迎登失敗三退出程進(jìn) 入 主圖 3.2登錄模塊結(jié)構(gòu)圖2. 界面設(shè)計“登錄” 界面是用戶進(jìn)入主界面的路徑， 由三個靜態(tài)文本框控件和兩個 Edit B

7、ox 控件，兩個按鈕控件和一個 Combo Box控件組成。界面如圖 3.3 所示。圖 3.3登錄界面3. 屬性設(shè)置三個靜態(tài)文本框的 Caption 屬性分別為：登錄方式、用戶名、密碼。ComboBox的 Data 屬性為：系統(tǒng)管理員 n 普通管理員 n 一般用戶。“密碼：”靜態(tài)文本框?qū)?yīng)的 Edit Box 的 Style 的 Password 屬性為選中狀態(tài)。兩個按鈕控件的 Caption屬性分別為：登錄系統(tǒng)和取消登錄。4. 數(shù)據(jù)庫相關(guān)設(shè)計登錄信息需從用戶信息表讀取， 該表 tbLogin 有四個字段，分別是：Username、Password、權(quán)限、科目。如表 3.1 所示。表 3.1用

8、戶信息表列名數(shù)據(jù)類型字 段可否為空說明長度Usernamenvarchar20NOT NULL用戶名Passwordnvarchar20NOT NULL密碼Purviewnvarchar20NOT NULL用戶權(quán)限（登錄方式）Subjectnvarchar50NULL用戶權(quán)限內(nèi)的科目5. 功能當(dāng)用戶在登錄界面輸入相關(guān)信息后，系統(tǒng)進(jìn)行判斷，輸入的用戶名、密碼、選擇的登錄方式和數(shù)據(jù)庫中的信息對應(yīng)無誤后進(jìn)入主界面。如果沒有選擇登錄方式，系統(tǒng)提示 " 請先選擇登錄方式 !" ；用戶名或密碼未填寫，系統(tǒng)提示" 用戶名或密碼未填寫 !" ；用戶名輸入錯誤或者登錄方式

9、選擇錯誤，系統(tǒng)提示" 用戶不存在 !" ；用戶名和登錄方式均正確后驗證密碼，正確進(jìn)入，不正確提示重新輸入，最多輸入三次，超過次數(shù)后系統(tǒng)自動退出。系統(tǒng)記錄下此用戶的權(quán)限和用戶名，以便以后對信息的各種操作。系統(tǒng)管理員有對所有題庫、題型、所有科目的試題和試卷的管理權(quán)限；一般管理員有對題型、權(quán)限范圍內(nèi)科目的試題和試卷的管理權(quán)限；一般用戶只能利用本系統(tǒng)對權(quán)限范圍內(nèi)的科目添加試卷（組卷和導(dǎo)入成套試卷），對試題信息只有瀏覽權(quán)限。這樣保證了系統(tǒng)的安全性。登錄在登錄窗口選擇登錄方式、鍵入用戶名和密碼后進(jìn)行登錄，登錄信息正確進(jìn)入系統(tǒng)主界面。用戶名或密碼輸入錯誤 3 次則自動退出系統(tǒng)。代碼如下所

10、示。UpdateData(TRUE);if(m_strPurview.IsEmpty()AfxMessageBox("請先選擇登錄方式 !");return;if(m_username.IsEmpty() | m_password.IsEmpty()AfxMessageBox("用戶名或密碼未填寫 !");return;CString strSql;strSql.Format("SELECT*FROMtbTeacherwhereUsername='%s'",m_username); pRs->Open(strSq

11、l,CADORecordset.openQuery); if(!pRs->IsOpen()return;if(pRs->GetRecordCount()<=0)AfxMessageBox("用戶不存在 !");wrong_num+;if(wrong_num = 3)OnCancel();return;/ pRs->MoveFirst(); CString strPassword;pRs->GetFieldValue("Username",strUsername); pRs->GetFieldValue("Pa

12、ssword",strPassword); pRs->GetFieldValue("Purview",strPurview); pRs->GetFieldValue("Subject",strSubject); pRs->GetFieldValue("ManageSubject",strManageSubject); if(m_strPurview != strPurview)AfxMessageBox("用戶不存在 !"); wrong_num+; if(wrong_num = 3)O

13、nCancel();return;if(m_password != strPassword)AfxMessageBox("密碼不正確，請重新輸入 !"); m_password.Empty(); UpdateData(FALSE);wrong_num+; if(wrong_num = 3)OnCancel();return;CDialog:OnOK();抽取現(xiàn)有試卷 - 預(yù)覽試卷及答案在“抽取現(xiàn)有試卷”界面選定試卷后單擊“預(yù)覽試卷及答案”按鈕，從數(shù)據(jù)庫中讀取當(dāng)前選中試卷的內(nèi)容和答案并將其賦值給“預(yù)覽試卷及答案”模塊中的相應(yīng)屬性，進(jìn)入該模塊后在相應(yīng)位置顯示試卷的內(nèi)容及答案。代

14、碼如下所示。CBrowseAllDlg browseallDlg;CString strID = Now_ID;if(strID.IsEmpty()return;CString strType;if(strID.GetLength() % 2)strType = "成套試卷 "elsestrType = "已組試卷 "CString strAnswer,strPaper;CString strChineseName = m_strSubject;CString strTableName;if(strType = "已組試卷 ")str

15、TableName = FindtbPaper(strChineseName); elsestrTableName = FindtbExist(strChineseName);CADORecordset *pRs = new CADORecordset(pDB); CString strSql;strSql.Format("select * from %s where ID='%s'",strTableName,strID);pRs->Open(_bstr_t(strSql),CADORecordset.openQuery);if(pRs->Is

16、Open()pRs->GetFieldValue("答案 ",strAnswer);pRs->GetFieldValue("內(nèi)容 ",strPaper);browseallDlg.m_strTitleAnswer = "試卷 ID ："browseallDlg.m_strTitleAnswer += strID;browseallDlg.m_strTitleAnswer += "答案 "browseallDlg.m_strTitlePaper = "試卷 ID："browseallD

17、lg.m_strTitlePaper += strID;browseallDlg.m_strTitlePaper += "內(nèi)容 "browseallDlg.m_strAnswer = strAnswer;browseallDlg.m_strPaper = strPaper;browseallDlg.strID = strID;browseallDlg.DoModal();pRs->Close();delete pRs;自動組卷在“自動組卷”模塊中完成所有組卷信息的設(shè)置后點擊“開始組卷”按鈕完成自動組卷的工作。設(shè)置信息中難度章節(jié)的限制設(shè)置為可選項。代碼如下所示。CStr

18、ing question_ID = ""/要添加的試卷信息CString question_score =""CString question_answer = ""CString fangan_ID = ""CString content_answer = SetTitle();for(int i = 0 ; i < m_nNumber+1 ; i+)/ 方案 ID CString str;m_comboi.GetLBText(m_comboi.GetCurSel(),str); fangan_ID +=

19、FindType(str);fangan_ID += IntToString(m_nCounti);CString temp;/ 大題m_strPaper += Number_Chinesei;m_strPaper += " 、"m_strPaper += m_stri;m_strPaper += "(共 "content_answer += Number_Chinesei;content_answer += "、 "content_answer += m_stri;content_answer += "(共"te

20、mp.Format(_T("%d"),m_nCounti);m_strPaper += temp;content_answer += temp;m_strPaper += " 小題 , 共"content_answer += "小題 , 共 "temp.Format(_T("%d"),m_nScorei);m_strPaper += temp;m_strPaper += " 分)rn"content_answer += temp;content_answer += "分 )rn&quo

21、t;question_score += temp;if(i != m_nNumber)question_score += "、 "/+沒有對章節(jié)和難度限制 +if(nSelChapi = 0 && nSelDiffi =0)/ 判斷是否已經(jīng)有題庫打開if(pRs->IsOpen()pRs->Close();/ 定義字符串存儲 SQL語句CString strSql;/ 初始化 SQL語句字符串，獲得所選題庫的數(shù)據(jù)strSql.Format("select*from%s where Type='%s'orderbyID&q

22、uot;,Table_name,m_stri);/ 打開當(dāng)前選中的題庫pRs->Open(strSql,CADORecordset.openQuery);int Question_num = pRs->GetRecordCount();if(Question_num < m_nCounti)AfxMessageBox("題庫中題目數(shù)量不足 !");return FALSE;/ 隨即選擇試題int No100;for(int now = 0 ; now < 100 ; now+)Nonow = -1;int j = 0;srand(unsigned)t

23、ime(NULL);/ 小題while(j < m_nCounti)int x = rand()%(Question_num);if(IsExist(No,x)continue;Noj = x;if(!pRs->MoveTo(x)continue;CString strNo;strNo.Format(_T("%d"),j+1);m_strPaper += strNo;m_strPaper += "."content_answer += strNo;content_answer += "."CString strConten

24、t;pRs->GetFieldValue("Content",strContent);m_strPaper += strContent;m_strPaper += "rnrn"CString strID;pRs->GetFieldValue("ID",strID);question_ID += strID;CString strAnswer;pRs->GetFieldValue("Answer",strAnswer);if(strAnswer.IsEmpty()strAnswer = "

25、無 "question_answer += strAnswer;content_answer += strAnswer;content_answer += "rnrn"j+;if(!(j = m_nCounti && i = m_nNumber)question_ID += ","question_answer +=" "/endwhile/endif/+限制了章節(jié)或難度 +else/+只限制了章節(jié) +if(nSelDiffi = 0)CString strSql;strSql.Format("se

26、lect * from %s where Type='%s'",Table_name,m_stri);int nNo = 1;bool IsFirst = TRUE;for(int j = 0 ; j < 30 ; j+)if(Chapter_numij = 1)CString temp;if(IsFirst)temp.Format(" and (Chapter='%s'",autoChapter_Chinesej);strSql += temp;elsetemp.Format(" or Chapter='%

27、s'",autoChapter_Chinesej);strSql += temp;IsFirst = FALSE;strSql += ")"/ 判斷是否已經(jīng)有題庫打開if(pRs->IsOpen()pRs->Close();/ 打開當(dāng)前選中的題庫pRs->Open(strSql,CADORecordset.openQuery);int Question_num = pRs->GetRecordCount();if(Question_num < m_nCounti)AfxMessageBox("題庫中題目數(shù)量不足 !&

28、quot;);return FALSE;/ 隨即選擇試題int No100;for(int now = 0 ; now < 100 ; now+)Nonow = -1;j = 0;srand(unsigned)time(NULL);/ 小題while(j < m_nCounti)int x = rand()%(Question_num);if(IsExist(No,x)continue;Noj = x;if(!pRs->MoveTo(x)continue;CString strNo;strNo.Format(_T("%d"),j+1);m_strPaper

29、 += strNo;m_strPaper += "."content_answer += strNo;content_answer += "."CString strContent;pRs->GetFieldValue("Content",strContent);m_strPaper += strContent;m_strPaper += "rnrn"CString strID;pRs->GetFieldValue("ID",strID);question_ID += strID;C

30、String strAnswer;pRs->GetFieldValue("Answer",strAnswer);if(strAnswer.IsEmpty()strAnswer = "無 "question_answer += strAnswer;content_answer += strAnswer;content_answer += "rnrn"j+;if(!(j = m_nCounti && i = m_nNumber)question_ID += ","question_answer +

31、=" "/endwhile/endif/+只限制了難度 +elseif(nSelChapi = 0)int nNo = 1;for(int j = 0 ; j < 5 ; j+)if(Difficulty_numij > 0)/ 判斷是否已經(jīng)有題庫打開if(pRs->IsOpen()pRs->Close();/ 定義字符串存儲 SQL語句CString strSql;/ 初始化 SQL語句字符串，獲得所選題庫的數(shù)據(jù)strSql.Format("select* from %swhere Type='%s'andDifficul

32、ty='%s'orderbyID",Table_name,m_stri,autoDifficulty_Chinesej);/ 打開當(dāng)前選中的題庫pRs->Open(strSql,CADORecordset.openQuery);int Question_num = pRs->GetRecordCount();/ 隨即選擇試題int No100;for(int now = 0 ; now < 100 ; now+)Nonow = -1;int k = 0;srand(unsigned)time(NULL);/ 小題while(k < Diffic

33、ulty_numij)int x = rand()%(Question_num);if(IsExist(No,x)continue;Nok = x;if(!pRs->MoveTo(x)continue;CString strNo;strNo.Format(_T("%d"),nNo);m_strPaper += strNo;m_strPaper += "."content_answer += strNo;content_answer += "."CString strContent;pRs->GetFieldValue(&q

34、uot;Content",strContent);m_strPaper += strContent;m_strPaper += "rnrn"CString strID;pRs->GetFieldValue("ID",strID);question_ID += strID;CString strAnswer;pRs->GetFieldValue("Answer",strAnswer);if(strAnswer.IsEmpty()strAnswer = "無 "question_answer +=

35、 strAnswer;content_answer += strAnswer;content_answer += "rnrn"k+;nNo+;if(!(nNo = m_nCounti && i= m_nNumber)question_ID += ","question_answer +=" "/endwhile/endif/endfor/endif/+既限制了章節(jié)又限制了難度 +elseCString strSql;strSql.Format("select * from %s where Type='

36、;%s'",Table_name,m_stri);bool IsFirst = TRUE;for(int j = 0 ; j < 30 ; j+)if(Chapter_numij = 1)CString temp;if(IsFirst)temp.Format("and(Chapter='%s'",autoChapter_Chinesej);strSql += temp;elsetemp.Format(" or Chapter='%s'",autoChapter_Chinesej);strSql +=

37、 temp;IsFirst = FALSE;strSql += ")"int nNo = 1;for(j = 0 ; j < 5 ; j+)if(Difficulty_numij > 0)/ 判斷是否已經(jīng)有題庫打開if(pRs->IsOpen()pRs->Close();/ 定義字符串存儲 SQL語句temp.Format("andDifficulty='%s'",autoDifficulty_Chinesej);strSql += temp;/ 打開當(dāng)前選中的題庫pRs->Open(strSql,CADOR

38、ecordset.openQuery);int Question_num = pRs->GetRecordCount();/ 隨即選擇試題int No100;for(int now = 0 ; now < 100 ; now+)Nonow = -1;int k = 0;srand(unsigned)time(NULL);/ 小題while(k < Difficulty_numij)int x = rand()%(Question_num);if(IsExist(No,x)continue;Nok = x;if(!pRs->MoveTo(x)continue;CStrin

39、g strNo;strNo.Format(_T("%d"),nNo);m_strPaper += strNo;m_strPaper += "."content_answer += strNo;content_answer += "."CString strContent;pRs->GetFieldValue("Content",strContent);m_strPaper += strContent;m_strPaper += "rnrn"CString strID;pRs->Get

40、FieldValue("ID",strID);question_ID += strID;CString strAnswer;pRs->GetFieldValue("Answer",strAnswer);if(strAnswer.IsEmpty()strAnswer = "無 "question_answer += strAnswer;content_answer += strAnswer;content_answer += "rnrn"k+;nNo+;if(!(nNo = m_nCounti &&am

41、p; i = m_nNumber)question_ID += ","question_answer +=" "/endwhile/endif/endfor(難度循環(huán) )/endif(選擇了難度和章節(jié) )/endif/endforCString question_content = m_strPaper;m_strAnswer = content_answer;CString ID = FindID(fangan_ID);CString strDate;GetDlgItem(IDC_DATETIMEPICKER_CREATE)->GetWindow

42、Text(strDate); CManageAllDlg *parent = (CManageAllDlg *)GetParent();CStringstrUsername = parent->GetUsername();newPaper.FanganID = fangan_ID;newPaper.ID = ID;newPaper.QuestionID = question_ID;newPaper.QuestionScore = question_score;newPaper.QuestionAnswer = question_answer;newPaper.Content = ques

43、tion_content;newPaper.Answer = content_answer;newPaper.Username = strUsername;newPaper.Date = strDate;if(fangan_ID = "" | ID = ""| question_ID = "" | question_score = ""| question_answer = "" | question_content = ""| content_answer = "

44、" | strUsername = ""| strDate = "")return FALSE;UpdateData(FALSE);CString strSave = "確認(rèn)將該試卷導(dǎo)入到： "strSave += m_strSubject;strSave += "試卷庫 "if(MessageBox(strSave," 確 認(rèn) 保 存 已 組 試 卷 ",MB_ICONQUESTION|MB_OKCANCEL) = IDOK)if(InsertNewItems()CString af

45、x = "試卷編號： "afx += newPaper.ID;afx += "已添加到 "afx += m_strSubject;afx += "試題庫 "MessageBox(afx," 提示",MB_ICONINFORMATION|MB_OK);m_buttonOut.EnableWindow(TRUE);m_buttonOutAnswer.EnableWindow(TRUE);return TRUE;elsem_strPaper = ""m_strAnswer = ""

46、UpdateData(FALSE);return FALSE;手動組卷在“手動組卷”模塊中完成所有組卷信息的設(shè)置后點擊“開始組卷”按鈕完成自動組卷的工作。代碼如下所示。CString question_ID = ""/要添加的試卷信息CString question_score =""/分值CString question_answer = ""CString fangan_ID = ""CString content_answer = SetTitle();for(int i = 0 ; i < m_nNu

47、mber+1 ; i+)/ 方案 ID CString str;m_comboi.GetLBText(m_comboi.GetCurSel(),str); fangan_ID += FindType(str);fangan_ID += IntToString(m_nCounti);CString temp;/ 大題m_strPaper += personNumber_Chinesei;m_strPaper += " 、"m_strPaper += m_stri;m_strPaper += "(共 "content_answer += personNumb

48、er_Chinesei;content_answer += "、 "content_answer += m_stri;content_answer += "(共"temp.Format(_T("%d"),m_nCounti);m_strPaper += temp;content_answer += temp;m_strPaper += " 小題 , 共"content_answer += "小題 , 共 "temp.Format(_T("%d"),m_nScorei);m_s

49、trPaper += temp;m_strPaper += " 分)rn"content_answer += temp;content_answer += "分 )rn"question_score += temp;if(i != m_nNumber)question_score += "、 "int Question_num = 0;str = strSelQuesi;if(!str.IsEmpty()int len = str.GetLength();char temp1000;strcpy(temp,str.GetBuffer(

50、100);int j = 0;while(j < len)int k = 0;char ques100;while(tempj != ',' && j < len)quesk = tempj;j+;k+;quesj = '0'CString strques = ques;/IDif(pRs->IsOpen()pRs->Close();CString strSql;strSql.Format("select*from%swhereID='%s'",Table_name,strques);pRs->Open(strSql,CADORecordset.openQuery);/ 添加信息i