【正文】 Text1(i) = 39。Exit SubElse If (用戶密碼) Trim() Then MsgBox 舊密碼輸入錯(cuò)誤！, vbOKOnly + vbExclamation, 提示 = Else If Trim() = Then MsgBox 請(qǐng)輸入新密碼！, vbOKOnly + vbExclamation, 提示 39。判斷數(shù)據(jù)表是否已經(jīng)讀完,即遍歷整張表 If (用戶名稱) = Trim() Then 39。s Guide ，北京：機(jī)械工業(yè)出版社，~156[12] 俞旭明等，Visual Basic ，北京：人民郵電出版社，~49附 錄系統(tǒng)使用說明：(1) 本系統(tǒng)的用戶名稱為admin，初始密碼為admin。在以后的工作中，我也要做到尊重?cái)?shù)據(jù)、尊重事實(shí)。致 謝本科的大學(xué)生活以今天的畢業(yè)論文畫了一個(gè)句號(hào)。 系統(tǒng)運(yùn)行界面按照單元測(cè)試、組裝測(cè)試、確認(rèn)測(cè)試、系統(tǒng)測(cè)試和用戶驗(yàn)收測(cè)試的步驟后，測(cè)出了大量的錯(cuò)誤，并給予了改正，改正后的系統(tǒng)運(yùn)行界面如下：(1) 用戶登陸界面(2) 系統(tǒng)主窗口(3) 修改密碼窗口(4) 員工信息窗體(5) 基本工資信息窗體(6) 工資結(jié)算窗體(7) 職工固定工資調(diào)整窗體(8) 打印預(yù)覽窗體 (13) 退出窗體第六章 系統(tǒng)小結(jié)本系統(tǒng)的開發(fā)打破了傳統(tǒng)的紙質(zhì)材料的人工管理工資的方式，節(jié)省了大量的人工操作的工作量，自動(dòng)完成眾多的信息處理，減少了數(shù)據(jù)出現(xiàn)錯(cuò)誤的幾率，加強(qiáng)了工資記錄的安全性和完整性，提高工作效率，實(shí)現(xiàn)企業(yè)工資信息管理的系統(tǒng)化、規(guī)范化和自動(dòng)化。 系統(tǒng)測(cè)試在開發(fā)本系統(tǒng)時(shí)，為了使系統(tǒng)能夠穩(wěn)定運(yùn)行，對(duì)本系統(tǒng)進(jìn)行了有針對(duì)性的全面測(cè)試，采取的方式是：(1) 菜單項(xiàng)測(cè)試：為了保證每一項(xiàng)下拉菜單能夠正確實(shí)現(xiàn)系統(tǒng)設(shè)計(jì)的功能，我把相關(guān)的基礎(chǔ)數(shù)據(jù)，基本上全部輸入到本系統(tǒng)中，并對(duì)每一個(gè)菜單項(xiàng)反復(fù)進(jìn)行了增加、刪除、修改等操作，從而保證了菜單級(jí)功能的正確實(shí)現(xiàn)。系統(tǒng)測(cè)試與建構(gòu)同時(shí)進(jìn)行或略慢。確認(rèn)測(cè)試是按照這些要求定出的“確認(rèn)測(cè)試計(jì)劃”進(jìn)行的。單元測(cè)試一般是由程序員完成，也稱程序調(diào)試。從產(chǎn)品角度看，測(cè)試計(jì)劃中的測(cè)試項(xiàng)目包括軟件結(jié)構(gòu)中的分系統(tǒng)層、子系統(tǒng)層、功能模塊層、程序模塊層中的各類模塊，從測(cè)試本身看，分為單元測(cè)試，組合測(cè)試，確認(rèn)測(cè)試等。由于程序中隱藏的缺陷只在特定的環(huán)境下才有可靠顯露，系統(tǒng)缺陷通常是由于對(duì)某些特定情況考慮不周造成的。(7) 保存設(shè)置，運(yùn)行程序，如圖29所示，最后一行是空白行，用來添加新的數(shù)據(jù)，選中整行之后，單擊鍵盤上的Delete鍵就可以刪除該行信息，隨便選中某個(gè)單元格，就可以進(jìn)行數(shù)據(jù)的更改。(4) 在該運(yùn)行窗口中直接單擊Adodc1控件中的箭頭圖標(biāo)即可實(shí)現(xiàn)DataGrid控件中選定數(shù)據(jù)的上下移動(dòng)。為了體現(xiàn)用Ado Data控件直接進(jìn)行記錄的移動(dòng)，這里就要引入DataGrid控件來進(jìn)行數(shù)據(jù)的顯示。在“記錄源”選項(xiàng)卡中，可以在“命令類型”下拉列表框中選擇用于記錄源的命令類型。(7) 在“屬性”對(duì)話框中，切換到“身份驗(yàn)證”選項(xiàng)卡，如圖27所示。單擊數(shù)據(jù)庫名稱文本框旁邊的命令按鈕，然后在Windows標(biāo)準(zhǔn)對(duì)話框中選擇作為數(shù)據(jù)源的Microsoft Jet數(shù)據(jù)庫。就選擇Microsoft OLE DB Provider，然后單擊“下一步”按鈕。使用該對(duì)話框可以方便地建立和數(shù)據(jù)源的連接，而在應(yīng)用程序的開發(fā)過程中，使用連接字符串有許多優(yōu)點(diǎn)（例如客戶端不用配置ODBC數(shù)據(jù)源名稱等）。(2) 在Ado Data控件上單擊鼠標(biāo)右鍵，在快捷菜單上選擇“屬性”命令，打開Ado Data控件的屬性對(duì)話框，如圖24所示。系統(tǒng)實(shí)施作為系統(tǒng)的最后物理實(shí)現(xiàn)階段，對(duì)于系統(tǒng)的質(zhì)量、可靠性和可維護(hù)性等有著十分重要的影響。(2) 添加控件l 添加兩個(gè)Label控件，并將其Caption屬性屬性值改為“版權(quán)所有”、“cj” 添加關(guān)于窗體(1) 添加窗體添加一個(gè)普通窗體，Caption屬性設(shè)為“關(guān)于”，Name屬性設(shè)為“frmAbout”。(2) 添加控件l 添加一個(gè)Frame1控件，并將其Caption屬性屬性值改為“工資信息輸入框”l 在Fram1控件中添加十二個(gè)Label控件，并將其Caption屬性屬性值分別改為：“員工編號(hào)：”、“基本工資：”、“遲到扣款/天：”、“員工姓名：”、“職務(wù)津貼：”、“事假扣款/天：”、“所屬部門：”、“工齡津貼/年：”、“病假扣款/天：”、“職務(wù)：”、“加班工資/天：”、“備注：”l 在Frame1控件中添加十二個(gè)TexBox控件l 添加一個(gè)Frame2控件，并將其Caption屬性屬性值刪除l 在Fram2控件中添加九個(gè)CommandButton控件，并將其Caption屬性屬性值分別改為：“首記錄”、“下一條”、“末記錄”、“上一條”、“增加”、“刪除”、“保存”、“返回”l 添加一個(gè)Frame3控件，并將其Caption屬性屬性值改為“固定工資瀏覽”l 添加一個(gè)DataGrid1控件，并將其DataSource屬性屬性值改為“Adodc1”l 添加一個(gè)Adodc1控件，并將其RecordSource屬性屬性值改為“職工工資明細(xì)表” 添加工資結(jié)算窗體(1) 添加窗體添加一個(gè)普通窗體，Caption屬性設(shè)為“工資結(jié)算”，Name屬性設(shè)為“frmJSalary”。(2) 添加控件l 添加一個(gè)Label1控件，并將其Caption屬性屬性值改為“所有職工：”l 添加一個(gè)Adodc1控件，并將其RecordSource屬性屬性值改為“職工信息表”l 添加一個(gè)Adodc2控件，并將其RecordSource屬性屬性值改為“select * from職工工資結(jié)算表”l 添加一個(gè)DataGrid1控件，并將其DataSource屬性屬性值改為“Adodc1”l 添加一個(gè)DataGrid2控件，并將其DataSource屬性屬性值改為“Adodc2”l 添加一個(gè)Label2控件，并將其Caption屬性屬性值改為“請(qǐng)輸入查詢的條件：”l 添加一個(gè)Label3控件，并將其Caption屬性屬性值改為“員工編號(hào)：”l 添加一個(gè)TexBox1控件，并將其Text屬性屬性值刪除l 添加一個(gè)Label4控件，并將其Caption屬性屬性值改為“員工姓名：”l 添加一個(gè)TexBox2控件，并將其Text屬性屬性值刪除l 添加一個(gè)CommendButton1控件，并將其Caption屬性屬性值改為“開始查詢”l 添加一個(gè)CommendButton2控件，并將其Caption屬性屬性值改為“重新查詢”l 添加一個(gè)CommendButton3控件，并將其Caption屬性屬性值改為“退出” 建立查詢部門工資情況窗體(1) 添加窗體添加一個(gè)普通窗體，Caption屬性設(shè)為“查詢部門工資情況”，Name屬性設(shè)為“frmSearch2”。為了體現(xiàn)用Ado Data控件直接進(jìn)行記錄的移動(dòng)，這里就要引入DataGrid控件來進(jìn)行數(shù)據(jù)的顯示。178。n 主要方法178。該事件的語法為：Adodc1_EndofRecordset(fMoreData As Boolean,adStatus As ,ByVal pRecordset As )當(dāng)用戶可能因調(diào)用MoveNext而移過Recordset結(jié)尾時(shí)，將調(diào)用該事件的處理程序。；HelpFile為包含該錯(cuò)誤詳細(xì)信息的幫助文件的路徑； HelpContext為幫助主題的上下文號(hào)碼。 EOFAction屬性值有以下3個(gè)值：adDoAddNew、adDoMoveLast和adStayEOF，它們分別代表如果當(dāng)前記錄到達(dá)了最后一條數(shù)據(jù)記錄的后面，采取增加一條新記錄、移動(dòng)到最后一條記錄或者繼續(xù)停留在原位置的3種操作。必須在Set語句中使用Recordset屬性，如下例所示：Dim rsNwind As New Set =rsNwind178。請(qǐng)確認(rèn)正在對(duì)其編寫代碼的提供者會(huì)支持ConnectionTimeout功能。如果連接超時(shí)，則返回一個(gè)錯(cuò)誤。Mode屬性只能在關(guān)閉Connection對(duì)象時(shí)方可設(shè)置。如何設(shè)置這個(gè)LockType屬性是一個(gè)復(fù)雜的決策，取決欲多個(gè)因素。如果知道正在使用的命令的類型，可通過設(shè)置CommandType屬性指令A(yù)DO直接轉(zhuǎn)到相關(guān)代碼。178。 PassWord屬性在訪問一個(gè)受保護(hù)的數(shù)據(jù)庫時(shí)該屬性也是必需的。 UserName屬性當(dāng)數(shù)據(jù)庫受密碼保護(hù)時(shí)，需要指定該屬性。 ConnectionString屬性Ado Data控件的ConnectionString屬性是一個(gè)字符串，可以包含進(jìn)行一個(gè)連接所需的所有設(shè)置值。然后單擊“確定”按鈕，這樣Ado Data控件就引入到當(dāng)前的VB項(xiàng)目中。數(shù)據(jù)提供者可以是任何符合OLE DB規(guī)范的數(shù)據(jù)源。更改窗體的屬性如下（僅列出修改的屬性）：① 名稱屬性值改為“frmLogin”② Caption屬性值改為“用戶登錄”③ StartUpPosition屬性值改為“2屏幕中心”(2) 添加控件① 為登錄窗體添加2個(gè)標(biāo)簽（Label），用來標(biāo)示窗體中的信息；2個(gè)文本框（TextBox），用來輸入用戶名稱和用戶密碼；2個(gè)按鈕（CommandButton），用來確定或返回。單擊工具欄中的添加MDI窗體或者選擇“工程”“添加MDI窗體”菜單，選擇MDI窗體，單擊“打開”按鈕，為這個(gè)工程添加一個(gè)多文檔窗體作為主窗體。在項(xiàng)目資源管理器中為這個(gè)工程添加一個(gè)模塊，添加的方法和添加窗體的方法一樣，只不過選擇的不是MDI窗體，而是模塊。Visual Basic就會(huì)自動(dòng)生成一個(gè)Form窗體，這個(gè)窗體的屬性采用的都是默認(rèn)設(shè)置。數(shù)據(jù)庫以表的形式存放相關(guān)的數(shù)據(jù)，點(diǎn)擊“使用設(shè)計(jì)器創(chuàng)建表”，為本系統(tǒng)創(chuàng)建表格如下： 員工基本信息表字段名稱數(shù)據(jù)類型說明員工卡號(hào)文本員工姓名文本性別文本籍貫文本出生日期日期學(xué)歷文本住址文本郵編文本聯(lián)系電話文本所屬部門編號(hào)文本所屬部門名稱文本職務(wù)文本參加工作時(shí)間日期進(jìn)入公司時(shí)間日期備注文本設(shè)置“員工卡號(hào)”為主鍵，并將其命名為：?jiǎn)T工基本信息表。用實(shí)體間聯(lián)系反映現(xiàn)實(shí)世界事物間的內(nèi)在聯(lián)系。系統(tǒng)檔案管理信息查詢統(tǒng)打印報(bào)表統(tǒng)退出系統(tǒng)員工信息部門信息部門信息查詢員工查詢部門打印預(yù)覽工資管理基本工資工資結(jié)算固資調(diào)整打印工資管理系統(tǒng)修改密碼圖31 企業(yè)工資管理系統(tǒng)功能模塊圖 概念設(shè)計(jì)概要設(shè)計(jì)基礎(chǔ)是完成需求分析后提供的需求說明書，用概念數(shù)據(jù)模型表示數(shù)據(jù)及其相互間的關(guān)系，這種數(shù)據(jù)模型是與DBMS無關(guān)的、面向現(xiàn)實(shí)世界的、容易理解的數(shù)據(jù)模型，其獨(dú)立于計(jì)算機(jī)數(shù)據(jù)模型，獨(dú)立于計(jì)算機(jī)的軟硬件系統(tǒng)，與用戶進(jìn)行交流十分方便。流入數(shù)據(jù)流：考勤信息表/計(jì)算工資流出數(shù)據(jù)流：財(cái)務(wù)系統(tǒng)/發(fā)放工資簡(jiǎn)要說明： 修改記錄：編寫： 日期：審核： 日期：(4) 系統(tǒng)流程圖系統(tǒng)流程圖又叫事務(wù)流程圖，是在計(jì)算機(jī)事務(wù)處理應(yīng)用進(jìn)行系統(tǒng)分析時(shí)常用的一種描述方法（另一個(gè)是數(shù)據(jù)流圖），它描述了計(jì)算機(jī)事務(wù)處理中從數(shù)據(jù)輸入開始到獲得輸出為止，各個(gè)處理工序的邏輯過程。⑥ 外部實(shí)體外部實(shí)體是系統(tǒng)的“人機(jī)”界面，也就是系統(tǒng)的數(shù)據(jù)流由外部實(shí)體流入，或者系統(tǒng)的數(shù)據(jù)向外部流出。如果是一個(gè)嵌套的數(shù)據(jù)結(jié)構(gòu)，只需列出它所包含的數(shù)據(jù)結(jié)構(gòu)名稱，因?yàn)檫@些數(shù)據(jù)結(jié)構(gòu)同樣在數(shù)據(jù)字典中有定義。 l 別名：同一數(shù)據(jù)項(xiàng)的名稱可能不止一個(gè)，稱為別名。為了區(qū)別和引用方便，左端加一小格，再標(biāo)上一個(gè)標(biāo)識(shí)，用字母D和數(shù)字組成。系統(tǒng)處理從數(shù)據(jù)存儲(chǔ)中提取數(shù)據(jù)，也將處理的數(shù)據(jù)返回?cái)?shù)據(jù)存儲(chǔ)。③ 數(shù)據(jù)流：數(shù)據(jù)流是指處理功能的輸入或輸出，它用來表示一中間數(shù)據(jù)流值，但不能用來改變數(shù)據(jù)值。 通常外部實(shí)體在數(shù)據(jù)流程圖中用正方形框表示，框中寫上外部實(shí)體名稱，為了區(qū)分不同的外部實(shí)體，可以在正方形的左上角用一個(gè)字符表示，同一外部實(shí)體可在一張數(shù)據(jù)流程圖中出現(xiàn)多次，這時(shí)在該外部實(shí)體符號(hào)的右下角畫上小斜線表示重復(fù)。(1) 根據(jù)對(duì)公司的調(diào)查確定公司的組織機(jī)構(gòu)如下：會(huì)計(jì)組出納組檔 案組考勤組業(yè)務(wù)組辦公組總經(jīng)理財(cái)務(wù)部人事部公關(guān)部出納組財(cái)務(wù)組檔案管理組考勤管理組業(yè)務(wù)組辦公組 圖21 工資管理系統(tǒng)組織機(jī)構(gòu)圖(2) 數(shù)據(jù)流程圖數(shù)據(jù)流程圖是一種能全面地描述信息系統(tǒng)邏輯模型的主要工具，它可以用少數(shù)幾種符號(hào)綜合地反映出信息在系統(tǒng)中的流動(dòng)、處理和存儲(chǔ)情況。(4) 員工考勤信息：包括員工編號(hào)、員工姓名、所屬部門、年份、月份、遲到天數(shù)、事假天數(shù)、病假天數(shù)、加班天數(shù)、備注。(6) 幫助關(guān)于本系統(tǒng)的版權(quán)聲明。(4) 信息查詢① 查詢員工工資信息：按照員工卡號(hào)或員工姓名，或是二者組合查詢員工的工資信息。(3) 工資管理① 基