【文章內容簡介】 所以需要在數據環(huán)境設計器 DataEnv 的數據連接對象 Con 中單擊右鍵，選擇 添加一個“數據命令”，取名為 sqlManager。 再打開剛剛添加的數據命令 sqlManager 的屬性對話框，在“通用”選項卡上選擇“ SQL 語句”，并輸入“ select UserName,Password from manager。 窗體界面的設計 在工程中添加一個窗體，命名為 frmLogin，再在上面添加所需要的控件，并設置它們的屬性（如表 8 所示）。 表 8 登錄窗體的主要控件屬性設置以及功能表 控件 名稱 屬性 功能 Form frmLogin Caption 屬性設為“登錄窗口”。 用來顯示 登錄窗體 Frame fraUsertype Caption 屬性設為“用戶類型” OptionButton optUserType Caption 屬性設為“管理 表示錄入管理 員 ” ,Index設為 0 員用戶 OptionButton optUserType Caption 屬性設為“學生” ,Index設為 1 表示學生用戶 Frame frauser_psw Caption 屬性設為“登錄” Label lblUserName Caption 屬性設為“用戶 名：” Label lblPassword Caption 屬性設為“密碼” Textbox txtUserName Text設為空 用來輸入用戶名 Textbox txtPas Text 屬 性 設 為 空 , 將PasswordChar 屬性設為“ *” 用來輸入密碼 CommandButton cmdOK Caption 屬性設為“確定” CommandButton cmdCancel Caption 屬性設為“取消” 窗體的界面如圖 5 所示。 圖 5 登錄窗體示意圖 窗體流程 在驗證用戶時，如果用戶選擇了“管理員”身份，則 系統(tǒng)將會在數據庫中的 Manager 表進行查詢，以確定是否在相應的用戶名和口令；如果用戶選擇了“員工”身份，則系統(tǒng)不需要身份驗證，可直接進入系統(tǒng)。 如果用戶所選擇的身份，及其輸入的用戶名口令和數據庫中對應的用戶名和密碼吻合，則用戶登錄成功，此時系統(tǒng)會自動退出登錄窗體，并進入到 MDI 主窗體。 如果用戶所輸入的用戶名和口令，沒有通過數據驗證，則用戶登 錄失敗。用戶需要重新輸入用戶名和口令，如果用戶登錄失敗超過 3次，則系統(tǒng)自動退出登錄窗體，并提示用戶“無權使用該系統(tǒng)”。 FORMMAIN 主窗體的制作 本系統(tǒng)采 取多文檔界面（ Multi Document Interface ,MDI） 來組織系統(tǒng)中各個窗體。多文檔界面是一種 Windows 用戶界面標準。它有一個父窗口，在典型情況下，父窗口用來顯示程序菜單以及包含子窗口。 在工程中添加一個 MDI 窗口，并取名為“ FORNMAIN” 。進行菜單的設計和代碼的設計。 菜單的設計 主菜單有“培訓需求管理”、“基本信息管理”、“培訓效果評價”、“系統(tǒng)管理”等。在“基本信息管理”的主菜單中，設計六個根菜單—— “課程信息管理”、“課程信息查詢”、“員工信息管理”、“員工基本信 息”、“成績信息管理”、“成績信息查詢”。在“系統(tǒng)管理”菜單中，設計兩個根菜單 —— “關于”、“退出”。如果以管理員身份登陸的話，則 FORMMAIN 窗體菜單如圖 6 所示，如果以員工身份登陸的話，如圖 7 所示。 圖 6管理員登陸示意圖 圖 7員工登陸示意圖 整個 MDI 主窗體的菜單相關內容如表 43 所示： 表 9 FORMMAIN窗體的菜單設計 對象 屬性 設置 一級菜單 — 培訓需求管理 標題 培訓需求管理 名稱 xq 說明 員工登陸時， xq的 Enabled屬性為false 一級菜單 基本信息管 理 標題 基本信息管理 名稱 jb 基本信息管理的二級菜單 標題 課程信息管理 名稱 kcxx 說明 員工登陸時， kcxx的 Enabled 屬性為false 基本信息管理的二級菜單 標題 課程信息查詢 名稱 kccx 說明 無 基本信息管理的二級菜單 標題 員工信息管理 名稱 yggl 說明 員工登陸時， yggl的 Enabled 屬性為false 基本信息管理的二級菜單 標題 員工基本信息 名稱 ygxx 說明 無 （續(xù)表） 對象 屬性 設置 基本信息管理的二級菜單 標題 成績信息管理 名稱 cjgl 說明 員工登陸時， cjxx的 Enabled 屬性為false 基本信息管理的二級菜單 標題 成績信息查詢 名稱 cjcx 說明 無 一級菜單 — “系統(tǒng)管理” 標題 系統(tǒng)管理 名稱 xtgl “系統(tǒng)管理”的二級菜單 標題 關于 名稱 gy “系統(tǒng)管理”的二級菜單 標題 退出 名稱 TC 子窗體的制作 成績信息、課程信息、員工信息、培訓需求信息、課程評價、關于等窗體都設計為主窗體 FORMMAIN 的子窗體。 成績信息窗體的制作 新建一個窗體，命名“成績信息”，其屬性和其他控件的設計如表 10 所示。 表 10 成績信息窗體及其控件屬性 控件 名稱 屬性 Form 成績信息 Caption 屬性設為“成績信息”， MDIChild屬性設為 True Label Label1 Caption 屬性設為“員工號” Label Label2 Caption 屬性設為“課程名” Label Label3 Caption屬性設為“時間” Label Label4 Caption 屬性設為“授課教師” Label Label5 Caption屬性設為“成績” Label Label6 Caption屬性設為“評價” Frame Frame1 Enabled屬性設為 false Text Text1 DataSource 屬性設為 Data1,DataField 屬性設為“員工號” Text Text2 DataSource 屬性設為 Data1,DataField 屬性設為 “課程名” Text Text3 DataSource 屬性設為 Data1,DataField 屬性設為“時間” Text Text4 DataSource 屬性設為 Data1,DataField 屬性設為“授課教師” Text Text5 DataSource 屬性設為 Data1,DataField 屬性設為“成績” Text Text6 DataSource 屬性設為 Data1,DataField 屬性設為“評價” Command Add Caption屬性設為“增加” Command Delete Caption屬性設為“刪除” Command Save Caption屬性設為“保存” Command Update Caption屬性設為 “修改” Command Cancel Caption屬性設為“取消” Command Find Caption屬性設為“查找” Command Exit Caption屬性設為“退出” Data Data1 Connect 屬性設為 Access,DataBaseName 屬性設為“ D:\新建文件夾 \企業(yè)員工培訓管理系統(tǒng) .mdb”，RecordSource 屬性設為“成績管理” 窗體如圖 8 所示 圖 8成績信息窗體示意圖 進入窗體時 ,“ 保存 ” 和 “ 取消 ” 按鈕不可用，只有在單擊“增 加 ” 或“修改”按鈕以后才 可用。當員工進入窗體時，只顯示“查找”和“退出”按鈕。 課程信息窗體的制作 新建一個窗體，命名“課程信息”，其屬性和其他控件的設計如表 11 所示。 表 11 課程信息窗體及其控件屬性 控件 名稱 屬性 Form 課程信息 Caption屬性設為“課程信息”， MDIChild 屬性設為 True Label Label1(0) Caption 屬性設為“課程號” Label Label1(1) Caption 屬性設為“課程類別” Label Label1(2) Caption 屬性設為“課程 名” Label Label1(3) Caption屬性設為“學時” Frame Frame1 Enabled 屬性設為 false Text Text1 DataSource屬性設為 Data1,DataField屬性設為“課程號” Text Text2 DataSource屬性設為 Data1,DataField屬性設為“課程類別” Text Text3 DataSource屬性設為 Data1,DataField屬性設為“課程名” Text Text4 DataSource屬性設為 Data1,DataField屬性設為“課程學時” Command Add Caption屬性設為“增加” Command Delete Caption屬性設為“刪除” Command Save Caption屬性設為“保存” Command Update Caption屬性設為“修改” Command Cancel Caption屬性設為“取消” Command Find Caption屬性設為“查找” Command Exit Caption屬性設為“退出” Data Data1 Connect屬性設為 Access,DataBaseName 屬性設為“ D:\新建文件夾 \企業(yè)員工培訓管理系統(tǒng) .mdb”， RecordSource 屬性設為“課程信息” 窗體如圖 9 所示 圖 9課程信息窗體示意圖 進入窗體時 ,“ 保存 ” 和 “ 取消 ” 按鈕不可用，只有在單擊“增加 ” 或“修改”按鈕以后才可用。當員工進入窗體時，只顯示“查找”和“退出”按鈕。 培訓需求信息窗體的制作 新建一個窗體，命名“培訓需求信息”，其屬性和其他控件的設計如表 12 所示。 表 12 培訓需求信息窗體及其控件屬性 控件 名稱 屬性 Form 需求信息 Caption 屬性設為“需求信息”， MDIChild屬性設為 True Label Label1 Caption 屬性設為“需要培訓的課程” Label Label2 Caption 屬性設為“要求培訓的員工” Label Label3 Caption 屬性設為“所在部門” Label Label4 Caption 屬性設為“員工號” Frame Frame1 Enabled屬性設為 false Text Text1 DataSource 屬性設為 Data1,DataField 屬性設為“需 要培訓的課程” Text Text2 DataSource 屬性設為 Data1,DataField 屬性設為“要求培訓的員工” Text Text3 DataSource 屬性設為 Data1,DataField 屬性設為“員工號” Text Text4 DataSource 屬性設為 Data1,DataField 屬性設為“所在部門” Command Add Caption屬性設為“增加” Command Delete Caption屬性設為“刪除” Command Save Caption屬性設為“保存” Command Update Caption屬性設為“修改” Command Cancel Caption屬性設為“取消” Command Find Caption屬性設為“查找” Command Exit Caption屬性設為“退出” Command Add Caption屬性設為“增加” Data Data1 Connect 屬性設為 Access,DataBaseName 屬性設為“ D:\新建文件夾 \企業(yè)員工培訓管理系統(tǒng) .mdb”，RecordSource 屬性設為“需求管理” 窗體如圖 10 所示 圖 10需求管理窗體示意圖 進入窗體時 ,“ 保存 ” 和 “ 取消 ” 按鈕不可用，只有在單擊“增加 ” 或“修改”按鈕以后才可用。當員工進入窗體時，只顯示“查找”和“退出”按鈕。 課程評價窗體的制作 新建一個窗體，命名“課程評價”，其屬性和其他控件的設計如表 13 所示。 表 13 課程評價窗體及其控件屬性 控件 名稱 屬性 Form 成績信息 Caption屬性設為“成績信息”， MDIChild屬性設為 True Label Label1(0) Caption 屬性設為“員工姓名” Label Label2(1) Caption 屬性設為“課程評價”