【正文】 Exit Sub End Sub Private Sub Label1_Click() End Sub Private Sub txtPassword_KeyDown(KeyCode As Integer, Shift As Integer) EnterToTab KeyCode End Sub Private Sub txtPassword_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Call cmdOK_Click End If End Sub Private Sub txtUserName_Click() = End Sub Private Sub txtUserName_KeyDown(KeyCode As Integer, Shift As Integer) EnterToTab KeyCode End Sub 在工程中添加一個窗體，命名為“ dColor”。 amp。 窗體屬性 設(shè)置值 具體說明 名稱 Label1 設(shè)置窗體名稱 BorderStyle 1Fixed Single 設(shè)置窗體的邊框?qū)傩? Caption 登錄 窗體的標題條文本 ControlBox False 取消控制按鈕 在登錄窗體中添加控件，并設(shè)置控件的屬性如下表所示： 對象名 屬性 屬性值 txtPassword （名稱） txtPassword txtUserName Style 0— Dropdown Combo Text txtUserName Cmd_Ok Caption 確定 Cmd_Cancel Caption 取消 編寫窗體代碼 ： 15 Private Sub Form_Load() Dim i As Integer i = 0 txtSQL = select * from user_Form With txtUserName Set mrc = ExecuteSQL(txtSQL, MsgText) Do While Not i = i + 1 Trim(mrc!user_ID) Loop .ListIndex = i 1 End With OK = False miCount = 0 End Sub Private Sub cmdCancel_Click() OK = False End Sub Private Sub cmdOK_Click() txtSQL = select * from user_Form where user_ID = 39。登錄過程需要完成一下任務(wù)：（ 1）根據(jù)用戶名和密碼來判斷是否能進入系統(tǒng)；（ 2）根據(jù)用戶類型決定用戶擁有的權(quán)限。 整個窗體界面的示意圖如圖所示。 主界面的主要屬性如下： 窗體屬性 設(shè)置值 具體說明 名稱 FrmMain 設(shè)置窗體名稱 Appearance 1 – 3D 外觀效果 Caption 學(xué)生信息管理系統(tǒng) 窗體的標題條文本 Enable True 窗體可用 Moveable True 窗 體可以移動 negotiateToolbars True MDIForm 對象在 MDIForm 的頂部或底部顯示活動對象的工具欄 StartUpPosition 0 – 手動 設(shè)置窗體彈出時，位置在屏幕中心 選擇“工具”菜單項中的“菜單編輯器”，編輯菜單內(nèi)容，如下圖所示。 Resume ExecuteSQL_Exit End Function 12 四、系統(tǒng)的實現(xiàn) 主界面是學(xué)生信息管理系統(tǒng)的主要窗口，擔(dān)任著調(diào)動程序其他模塊的功能，是整個應(yīng)程序的核心。 amp。 End Function Public Function ExecuteSQL(ByVal SQL As String, MsgString As String) As Dim n As Dim rst As Dim sTokens() As String On Error GoTo ExecuteSQL_Error sTokens = Split(SQL) Set n = New ConnectString If InStr(INSERT,DELETE,UPDATE, UCase$(sTokens(0))) Then SQL MsgString = sTokens(0) amp。UID=zengym。 、數(shù)據(jù)庫連接（在模塊 中） Public Function ConnectString() As String ConnectString = Driver={Microsoft ODBC for oracle}。 測試連接數(shù)據(jù)庫是否成功： 輸入密碼 zengym 后顯示連接結(jié)果 11 “ Password” 輸入 zengym，點擊 OK 測試連接是否成功。 選擇“控制面板”→“管理工具”→“數(shù)據(jù)源”→“系統(tǒng) DSN”標 簽→“添加”→選擇“ Oracle in OraHome92”數(shù)據(jù)庫驅(qū)動程序進入數(shù)據(jù)庫 Oracle ODBC Driver Configuration 配置。 （ 8）用戶（ user_Form）表 10 CREATE TABLE (user_ID Varchar2(50) Primary Key, user_PWD Varchar2(50), user_DATE date ) TABLESPACE USERS。 （ 6）學(xué)生成績信息 (score_Form)表 CREATE TABLE (score_NO number Primary Key, score_per Varchar2(50), score_Cla number, score_Stu number, score_Cou Varchar2(50), score_Sco Varchar2(50) ) TABLESPACE USERS。 （ 4）獎懲信息 (prize_Form)表 CREATE TABLE (prize_name varchar2(50) Primary Key, prize_Rem Varchar2(50) ) TABLESPACE USERS。 （ 2）班級信息 (class_Form)表 CREATE TABLE (class_No number Primary Key, class_Name varchar2(50), class_Teacher varchar2(50), class_Remarks varchar2(50) ) TABLESPACE USERS。這 8 個表包括班級課程信息 (class_cour)表、班級信息(class_Form)表、課程信息 (course_Form)表、獲獎信息 (prize_Form)表、獲獎學(xué)生 信息 (Prize_Stud)表、學(xué)生成績信息 (score_Form)表、學(xué)生信息(student_Form)表、用戶（ user_Form）表。 根據(jù)學(xué)生信息管理系統(tǒng)的功能要求，選取 Oracle 為后臺數(shù)據(jù)庫，數(shù)據(jù)庫前臺控制界面使用 Visual Basic 來實現(xiàn)。 grant create session,resource to zengym。 、系統(tǒng)的功能模塊結(jié)構(gòu)如下： 7 二 數(shù)據(jù)庫設(shè)計 在設(shè)計數(shù)據(jù)庫表結(jié)構(gòu)之前，首先要創(chuàng)建一個學(xué)生信息管理的數(shù)據(jù)庫用戶，這里定義為 zengym,所有相關(guān)的表都屬于這個用戶。 涉密論文按學(xué)校規(guī)定處理。 作者簽名： 日期： 年 月 日 學(xué)位論文版權(quán)使用授權(quán)書 本學(xué)位論文作者完全了解學(xué)校有關(guān)保留、使用學(xué)位論文的規(guī)定，同意學(xué)校保留并向國家有關(guān)部門或機構(gòu)送交論文的復(fù)印件和電子版，允許論文被查閱和借閱。對本文的研究做出重要貢獻的個人和集體，均已在文中以明確方式標明。 作者簽名： 日 期： 4 學(xué)位論文原創(chuàng)性聲明 本人鄭 重聲明：所呈交的論文是本人在導(dǎo)師的指導(dǎo)下獨立進行研究所取得的研究成果。對本研究提供過幫助和做出過貢獻的個人或集體，均已在文中作了明確的說明并表示了謝意。 3 畢業(yè)設(shè)計（論文）原創(chuàng)性聲明和使用授權(quán)說明 原創(chuàng)性聲明 本人鄭重承諾：所呈交的畢業(yè)設(shè)計（論文），是我個人在指導(dǎo)教師的指導(dǎo)下進行的研究工作及取得的成果。 2）課程設(shè)計論文編寫要求 （ 1）理論設(shè)計部分以課程設(shè)計論文的形式提交，格式必須按照課程設(shè)計論文標準 格式進行書寫和裝訂。 課程設(shè)計報告冊 2 課程設(shè)計報告 設(shè)計項目 編 號 1 名 稱 學(xué)生信息管理系統(tǒng) 主要 儀器 設(shè)備 PC 附屬 設(shè)備 主要 使用 軟件 Oracle、 Visual 起止時間 2020 年 12 月 10 日— 12月 30日 同組人 無 課程設(shè)計 任 務(wù)書 1. 本課程設(shè)計的目的 掌握 Oracle 基本內(nèi)容，了解備份和恢復(fù)數(shù)據(jù)庫的方法；基本的 Oracle 語句，如添加、查詢、修改、刪除記錄語句； VB 中數(shù)據(jù)綁定控件的方法，熟悉數(shù)據(jù) 庫連接技術(shù)。 2． 課程設(shè)計的任務(wù)及要求 1）基本要求： 要求掌握 Oracle 的基本概念，了解備份和恢復(fù)數(shù)據(jù)庫的方法 ,基本的 Oracle 語句，如添加、查詢、修改、刪除記錄語句 , 熟悉數(shù)據(jù)庫連接技術(shù)。 （ 2）課程設(shè)計報告（論文）包括中文摘要、目錄、緒論、正文、設(shè)計小結(jié)、參考文獻、附錄等； （ 3）正文部分應(yīng)包含系統(tǒng)功能流程圖、系統(tǒng)結(jié)構(gòu)框圖、模塊流程圖、設(shè)計目的、實現(xiàn)思路、實現(xiàn)步驟、調(diào)試運行等。盡我所知，除文中特別加以標注和致謝的地方外，不包含其他人或組織已經(jīng)發(fā)表或公布過的研究成果，也不包含我為獲得 及其它教育機構(gòu)的學(xué)位或?qū)W歷而使用過的材料。 作 者 簽 名： 日 期： 指導(dǎo) 教師簽名： 日 期： 使用授權(quán)說明 本人完全了解 大學(xué)關(guān)于收集、保存、使用畢業(yè)設(shè)計（論文）的規(guī)定，即：按照學(xué)校要求提交畢業(yè)設(shè)計（論文）的印刷本和電子版本；學(xué)校有權(quán)保存畢業(yè)設(shè)計（論文）的印刷本和電子版，并提供目錄檢索與閱覽服務(wù)；學(xué)校可以采用影印、縮印、數(shù)字化或其它復(fù)制手段保存論文；在不以贏利為目的前提下，學(xué)?？梢怨颊撐牡牟糠只蛉績?nèi)容。除了文中特別加以標注引用的內(nèi)容外，本論文不包含任何其他個人或集體已經(jīng)發(fā)表或撰寫的成果作品。本人完全意識到本聲明的法律后果由本人承擔(dān)。本人授