【正文】 + Text2 + 39。 + Text1 + 39。打印統(tǒng)計包括班級統(tǒng)計分析、檔案統(tǒng)計分析、課程統(tǒng)計分析、成績統(tǒng)計分析和交費統(tǒng)計分析五類。 (課時) (課程性質) (考試性質) (=) (專業(yè)) (年級) (課程名稱) (教材) (任課老師)39。 End If If sqlstr = Then MsgBox 請先輸入查找時間！ Exit Sub End If strTiaoJian = select 專業(yè),年級,學期,課程名稱,教材,任課老師,課時,上課地點,課程性質,考試性質 from 課程表 where amp。 = amp。 and amp。 = amp。 and amp。 Format(str2, yyyymmdd) amp。 Trim() amp。 Format(str1, yyyymmdd) amp。 Trim() amp。 amp。 amp。 amp。 amp。 KCCX1 Else MsgBox 請選擇連接方式！, vbOKOnly, 警告 Exit Sub End IfEnd If If (KCCX1 amp。 KCCX2 End IfElse If KCCX1 = Then strTiaoJian = select * from 課程表 where amp。 KCCX1 amp。 KCCX2 ElseIf KCCX2 = Then strTiaoJian = select * from 課程表 where amp。 and amp。 KCCX1 Else strTiaoJian = select * from 課程表 where amp。)0 End Select If = True Then If KCCX1 = Then strTiaoJian = select * from 課程表 where amp。 Trim() amp。 ,39。 Case like KCCX2 = Instr(1, amp。 Trim(Text2) amp。 39。 amp。)0 End Select a = Trim(Combo4)Select Case a Case = KCCX2 = amp。 Trim() amp。 ,39。 Case like KCCX1 = Instr(1, amp。 Trim(Text1) amp。 39。 amp。代碼如下：Dim sqlstr As StringPrivate Sub Combo1_Change()End SubPrivate Sub Combo2_Change()End SubPrivate Sub Combo4_Change()End SubPrivate Sub Combo5_Change()End SubPrivate Sub Combo7_Change()End SubPrivate Sub Command1_Click()Dim a As StringDim KCCX1 As StringDim KCCX2 As StringDim str1 As StringDim str2 As StringIf = True Thena = Trim(Combo2)Select Case a Case = KCCX1 = amp。 = (考試性質)End SubPrivate Sub DTPicker1_CallbackKeyDown(ByVal KeyCode As Integer, ByVal Shift As Integer, ByVal CallbackField As String, CallbackDate As Date)End SubPrivate Sub Form_Activate() = strTiaoJianSet = End SubPrivate Sub Form_Load() (必修) (選修) (自開) (考試) (查考) = = 39。 = (上課地點)39。 = (任課老師)39。 = (課程名稱)39。 = (年級)39。39。 Trim() amp。 = select * from 課程表 where 專業(yè) = 39。, myCon, 3, 2 myRs!年級 = myRs!學期 = myRs!課程名稱 = myRs!教材 = myRs!任課老師 = myRs!課時 = myRs!上課地點 = myRs!課程性質 = myRs!考試性質 = MsgBox 您確定要修改嗎？, vbYesNo, 提示 = = 39。 amp。下面為其代碼：Private Sub Command1_Click()Dim myCon As New Dim myRs As New Dim ZhuanYe, NianJi, XueQi, KeCheng, JiaoCai, RenKLS, KeShi, ShangKeDD, KeChengXZ, KaoShiXZ As StringZhuanYe = NianJi = XueQi = KeCheng = JiaoCai = RenKLS = KeShi = ShangKeDD = KeChengXZ = KaoShiXZ = If Trim(ZhuanYe) = Or Trim(NianJi) = Or Trim(XueQi) = Or Trim(KeCheng) = Or Trim(JiaoCai) = Or Trim(RenKLS) = Or Trim(KeShi) = Or Trim(ShangKeDD) = Or Trim(KeChengXZ) = Or Trim(KaoShiXZ) = Then MsgBox 請?zhí)顚懸薷恼n程資料的內容！ = = Exit SubEnd If dsn=信息 select * from 課程表 where 專業(yè)=39。然后再右擊，同樣，在彈出的快捷菜單中選擇“編輯” ，我們就可以所在的表格的寬度進行調整。同時，將桌面的 DataGrid 控件選中，在屬性框中，將它的 Datasoure 設為 Adodc。 在 VB 中，用 ADODC 鏈接數(shù)據(jù)庫，用 DataGrid 或 DATA 將庫中的數(shù)據(jù)在界面中顯示出來，本系統(tǒng)采用 DataGrid。其中日期的數(shù)據(jù)類型為日期/時間天型，其它的數(shù)據(jù)類型為文本型；成績表中字段為：學號、姓名、年級、專業(yè)、學期、考試時間、考試科目、考試地點、課程性質、科目分數(shù)、違紀類型、備注；課程表中字段為：專業(yè)、年級、學期、課程名稱、教材、任課老師、課時、上課地點、課程性質、考試性質；用戶資料中的字段包括：用戶名、密碼、身份。登錄窗口界面： 本系統(tǒng)中使用到的數(shù)據(jù)表主要有班級表、成績表、繳費表、課程表、學生檔案、用戶資料，由這六個表，組成了名為信息的數(shù)據(jù)庫（如圖一） 。對每個模塊進行詳細的算法設計。在這一階段的工作中，主要任務有以下幾項：根據(jù)原型化的開發(fā)原則，為系統(tǒng)的每個模塊功能進行界面設計，作為進一步優(yōu)化的基礎。其數(shù)據(jù)表是按用戶的要求在運行過程中動態(tài)建立的。課程表：記錄各專業(yè)各年級開課情況，在添加學生記錄時，可根據(jù)該表的情況決定在成績表添加學生記錄的個數(shù)。成績表：記錄學生的期中、期末及總評的各科成績。由于成績信息和教師信息與學生信息關系密切，因此將這三類信息存放在同一數(shù)據(jù)庫中，以提高多種信息同時讀取的速度。按班級為單位查詢備份數(shù)據(jù)庫的學生信息，補考情況。根據(jù)用戶的要求，查詢學生數(shù)據(jù)庫的所有可能的信息，其中包括成績查詢。查詢功能。它是學生成績管理的基礎。課程信息管理功能課程管理。成績備份。補考成績錄入。總分及名次。 2．學生成績管理功能分數(shù)錄入。學生信息備份。分班功能實現(xiàn)按新生的報考專業(yè)、成績及性別進行分班。本部分的功能主要有新生導入、分班、及設置學號。該功能主要進行成批地刪除學生信息，如連續(xù)學號區(qū)段的多位學生信息刪除，整個班級的刪除，所有學生信息的刪除。刪除學生。其中分為單個添加和成批添加。添加學生。其主要功能包括：學生信息管理功能班級管理。由于采用統(tǒng)一的數(shù)據(jù)信息，使相關資料能夠快速地查詢所需的數(shù)據(jù)、資料及其它信息的，使信息快速高效運行。最后進行打印。本系統(tǒng)主要信息流程為：教務信息維護接受學生的信息，學生信息查詢根據(jù)教務信息維護的學生信息做出對所接收的信息合理性進行判斷，并交于信息維護進行相應的修改，再把信息存入數(shù)據(jù)庫中。通過本系統(tǒng)，把本校內部查詢學生信息、教務信息、學生選課各個環(huán)節(jié)進行有效地計劃、組織和控制。學生信息管理系統(tǒng)是為本校開發(fā)的，本系統(tǒng)所采用的語言是 Visual Basic，用Microsoft Access 2022 數(shù)據(jù)庫完成。第三章 可行性分析學生信息，作為一個學校，就有一定的工作量存在，而學生信息，它的工作量可能是其它信息工作量的幾倍，班級的增加、班級的查找、班級的修改；學生檔案；課程管理；成績管理；繳費管理；統(tǒng)計等等，每個信息的數(shù)據(jù)都在不斷地變化著，如果采用人工的方式進行操作，那么，一天的工作量，足以讓人覺得比較繁瑣，吃不消。（1）標識需要的數(shù)據(jù)；（2）收集被子標識的字段到表中；（3）標識主關鍵字字段；（4）規(guī)范數(shù)據(jù)；（5）標識指定字段的信息；修改已建的數(shù)據(jù)庫 數(shù)據(jù)庫的修改分為；添加、編輯和刪除記錄。新建一個數(shù)據(jù)庫創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細的規(guī)劃數(shù)據(jù)庫，設計必須是靈活的、有邏輯的。計算機的數(shù)據(jù)庫可以分為兩類：非關系數(shù)據(jù)庫(flatfile)和關系數(shù)據(jù)庫（relational） 。2．2．5 使用 Access2022 創(chuàng)建數(shù)據(jù)庫數(shù)據(jù)庫的概念數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進行操作的工具。一個記錄集合是動態(tài)的也就意味著，當原來的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會隨之改變。我們可以設置 ADODC 控件的各個屬性，告訴它要調用那個數(shù)據(jù)庫的哪個部分。Visual Basic、Access 以及其他微軟的軟件產(chǎn)品都是通過共用 JET 數(shù)據(jù)庫引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。如上所述，Access 作為關系數(shù)據(jù)庫開發(fā)具備了許多優(yōu)點，可以在一個數(shù)據(jù)包同時擁有桌面數(shù)據(jù)庫的便利和關系數(shù)據(jù)庫的強大功能。Access 也提供了數(shù)據(jù)存儲庫，可以使用桌面數(shù)據(jù)庫文件把數(shù)據(jù)庫文件置于網(wǎng)絡文件服務器，與其他用戶共享數(shù)據(jù)庫。數(shù)據(jù)表示圖提供了一種類似于 Excel 的電子表格，可以使數(shù)據(jù)庫一目了然。關系型數(shù)據(jù)庫的實現(xiàn)Access2022 就是關系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲和檢索。Visual Basic 提供了大量的控件，這些控件可用于設計界面和實現(xiàn)各種功能，減少了編程人員的工作量，也簡化了界面設計過程，從而有效的提高了應用程序的運行效率和可靠性。此時模塊也發(fā)展成為最終產(chǎn)品了。2．2．4 怎樣開發(fā)一個學生信息管理系統(tǒng)的查詢模塊？查詢模塊的設計分析根據(jù)實際情況，我們使用原型法(Rapid Prototyping) 即以少量代價快速地構造一個可執(zhí)行的軟件模型。在“控件”選項卡列表中選擇“Microsoft Windows Common Controls ”后工具相中增加改控件。通過在 CoolBar 中遷入其他空間你也可以向用戶提供更好的靈活性和義用性。 實現(xiàn)工具欄CoolBar 控件與 Office2022 中看到的 CoolBar 是類似的。2 、實現(xiàn)菜單選項菜單是程序最重要的特性之一，大多數(shù)程序都依賴一個定義良好的菜單使程序易于使用和維護，Visual Basic 也提供了強大的創(chuàng)建菜單功能是程序更加標準。使用應用程序具有可通用性可說擴展性和強有力的功能。Visual Basic 應用程序基本的構建塊是用戶所創(chuàng)建的對象，每一個對象都具有一些特性和行為（屬性、事件和方法） 。Visual Basic 作為一種面向對象的編程方法，把程序和數(shù)據(jù)封裝起來作為一個對象，并為每個對象賦予相應的屬性。系統(tǒng)程序大體可分成四個模塊：數(shù)據(jù)輸入、根據(jù)查詢、數(shù)據(jù)打印和通訊。過程 (Procedure)過程是指經(jīng)過定義或說明的，或基于某一對象對應的事件所引發(fā)的程序段。它是在程序執(zhí)行的過程中要計算機執(zhí)行的某種操作。程序所用的鍵盤事件有 KeyPress（按鍵）事件，KeyDown 事件和 KeyUp 事件；鼠標事件有 Click（單擊鼠標）事件，DbDlicd（雙擊鼠標） 。事件 (Events)事件是指用戶或操作者對計算機進行的某一操作（如擊鍵、單擊或移動鼠標等）的行為或系統(tǒng)狀態(tài)發(fā)生的變化。用戶通過適當?shù)卦O置或改變對象的屬性來確定對象的外觀及性能特征，從而有效地使用系統(tǒng)提供的對象。正確使用對象可以減少程序和開發(fā)時間，提高程序設計者的