【正文】 a pterodactyl, was ma king a reconnaissance flight parallel to Sea Shepherd. Suddenly the pelican plunged. A splash, a quic k gobbling movement, and another fat fish was stored away in the bird39。針對工資管理，還應(yīng)該建立一個有普遍意義的模型，這樣對用戶來說，就比較容易通過修改有關(guān)管理制度來適應(yīng)我們開發(fā)的軟件。但回過頭再去看有關(guān)的教科書，經(jīng)過一段時間的鉆研，對與這些知識點的相關(guān)的背景，概念和解決方案理解得更透徹了，學(xué)習(xí)起來也越來越有興趣，越來越輕松。通過連編將項目資源，如視圖、查詢、表單、報表、 菜單、類、過程這些包含于項目管理器中的文件信息結(jié)合在一起，生成一個擴(kuò)展名為 .exe 的可執(zhí)行文件。表頭項居中 .FillStyle = flexFillRepeat .Col = 0 .Row = 0 .RowSel = 1 .ColSel = .Cols 1 .CellAlignment = 4 39。 amp。MsgBox KeyCode 39。稅額變化 If Trim(txtItem(9) amp。添加判斷是否有相同的 ID 記錄 txtSQL = select * from gzshuju where 工資號 =39。* amp。 在 ACCESS 中數(shù)據(jù)庫是一個邏輯上的概念，通過一組系統(tǒng)文件將相互關(guān)聯(lián)的數(shù)據(jù)表及其數(shù)據(jù)庫對象組織起來，成為擴(kuò)展名為 .mdb 的數(shù)據(jù)庫文件。 可用性。 目標(biāo)系統(tǒng)應(yīng)該達(dá)到以下要求： 時間經(jīng)濟(jì)性。員工基本信息包括員工號 、姓名、部門、職位、基本工資等。數(shù)據(jù)準(zhǔn)備與錄入工作要注意數(shù)據(jù)的準(zhǔn)確性，在整理、錄入、校驗等各個環(huán)節(jié)把好關(guān)，為系統(tǒng)的順利轉(zhuǎn)換打好基礎(chǔ)。系統(tǒng)設(shè)計要根據(jù)系統(tǒng)分析報告中的系統(tǒng)邏輯模型綜合考慮各種約束，利用一切可利用的技術(shù)手段和方法進(jìn)行 各種具體設(shè)計，確定新系統(tǒng)的實施方案，解決“系統(tǒng)怎么做”的問題。 （ 6）新系統(tǒng)的功能和目標(biāo)：了解各級領(lǐng)導(dǎo)和各類業(yè) 務(wù)工作人員對新系統(tǒng)功能的要求，系統(tǒng)分析 (又稱邏輯設(shè)計 )是管理信息系統(tǒng)開發(fā)的關(guān)鍵環(huán)節(jié)，要求在系統(tǒng)調(diào)查的基礎(chǔ)上，對新系統(tǒng)的功能進(jìn)行細(xì)致的分析，并建立一個新系統(tǒng)的邏輯模型。 調(diào)研的主要內(nèi)容有： （ 1）現(xiàn)行系統(tǒng)概況：該組織的發(fā)展歷史、目前組織的規(guī)模、工作狀況、管理水平、與外界的主要聯(lián)系等。雙方共享開發(fā)成果，實際上是一種半委托性質(zhì)的開發(fā)工作。缺點是由于不是專業(yè)開發(fā)隊伍，容易受業(yè)務(wù)工作的限制，系統(tǒng)優(yōu)化不夠，開發(fā)水平較低，且由于開發(fā)人員是臨時從所屬各單位抽調(diào)出來進(jìn)行管理信息系統(tǒng)的開發(fā)工作，這些人員在其原部門還有其他工作，所以精力有限，容易造成系統(tǒng)開發(fā)時間長，開發(fā)人員調(diào)動后，系 統(tǒng)維護(hù)工作沒有保證的情況。錄入這類數(shù)據(jù)之前， MIS 軟件應(yīng)在相應(yīng)位置彈出一個列表框，待用戶以 鼠標(biāo)點擊，而不應(yīng)讓用戶每次都輸入這些漢字。 （ 3）界面必須使用戶隨時掌握任務(wù)的進(jìn)展情況 人機(jī)界面應(yīng)該能夠告訴用戶軟件運行的進(jìn)度。一方面，人向計算機(jī)輸入信息時應(yīng)當(dāng)盡量采取自然的方式；另一方面，計算機(jī)向人傳遞的信息必須準(zhǔn)確，不致引起誤解或混亂。 MIS 是一項系統(tǒng)工程，不是只靠一些計算機(jī)開發(fā)人員就可以完成的，必須有企業(yè)管理人員，尤其是企業(yè)領(lǐng)導(dǎo)的積極參與。 圖 第二章 管理信息 系統(tǒng)研究概述 信息作為生產(chǎn)力中最活躍的因素，很早就在人類經(jīng)濟(jì)生活中發(fā)揮著不可替代的作用，但把信息納入企業(yè)經(jīng)營管理系統(tǒng)中高效處理和應(yīng)用是在計算機(jī)發(fā)明以后的 50 年代末。有些環(huán)境中是由作為大型 ERP 軟件中的一個模塊引進(jìn)的，有些是作為企業(yè)的財務(wù)系統(tǒng)的一部 分。 目 錄 第一章 緒論 ? ???????????????????? 3 研究課題的背景 ??????????? ????? 3 研究思路和工作計劃 ??????? ????? ?? 3 第二章 管理信息系統(tǒng)研究概述 ????????????? 5 管理信息系統(tǒng)的發(fā)展歷史 ????? … ??????? 5 管理信息系統(tǒng)的特點 ?????? … ???????? 5 管理信息系統(tǒng)的組成 ????????????? 5 管理信息系統(tǒng)的界面特點 ??????????? 6 管理信息系統(tǒng)的開發(fā)方式 ??????? … ????? 7 管理信息系統(tǒng)的開發(fā)過程 ????????????? 9 系統(tǒng)開發(fā)準(zhǔn)備 ???????????????? 9 系統(tǒng)調(diào)研 ?????????????????? 9 系統(tǒng)設(shè)計 ????????????????? 10 系統(tǒng)實施與轉(zhuǎn)換 ?????????????? 10 系統(tǒng)維護(hù)和評價 ?????????????? 10 第三章 工資管理系統(tǒng)分析與設(shè)計 ?? ????????? 12 系統(tǒng)功能需求簡介 … ?????????????? 12 功能需求描述 ????????????????? 12 目標(biāo)系統(tǒng)要求 ????????????????? 13 系 統(tǒng)平臺選擇 ????????????????? 13 數(shù)據(jù)庫設(shè)計 ?????????????????? 13 數(shù)據(jù)庫介紹 ???????????????? 13 數(shù)據(jù)流圖 ????????????????? 14 數(shù)據(jù)詞典分析 ??????????????? 15 第四章 工資管理系統(tǒng)的功能實現(xiàn) ??????????? 16 系統(tǒng)界面 … ?????????????????? 16 系統(tǒng)管理模塊編碼設(shè)計 ????????????? 16 人員管理 ????????????????? 16 部門管理 ????????????????? 18 工資信息管理模塊編碼設(shè)計 ??????????? 19 錄入員工工資 ??????????????? 19 查詢模塊編碼設(shè)計 ??????????????? 27 按姓名查詢 ???????????????? 27 按工資編號查詢 ?????????????? 31 系統(tǒng)維護(hù)模塊編碼設(shè)計 ????????????? 33 報表 統(tǒng)計模塊 ????????????????? 34 連編程序 ??????????????????? 34 第五章 小 結(jié) ??????????????????? 35 致謝 ??????????????????????? 36 參考文獻(xiàn) ????????????????????? 37 第一章 緒 論 借助現(xiàn)代信息技術(shù)和管理理論，建立企業(yè)管理信息系統(tǒng)是當(dāng)今社會的重要趨勢。 【關(guān)鍵字】管理信息系統(tǒng)，數(shù)據(jù)庫，工資管理，實體關(guān)系圖（ ER 圖），數(shù)據(jù)字典，數(shù)據(jù)流圖。 現(xiàn)在應(yīng)用在大中型企業(yè)的管理信息系統(tǒng)中，幾乎都包括了工資管理模塊。完成全部工作 大約用了 3 個月的時間。 人是指企業(yè)領(lǐng)導(dǎo)者、管理人員、技術(shù)人員，以及 MIS 建設(shè)的領(lǐng)導(dǎo)機(jī)構(gòu)和實施機(jī)構(gòu)，他們在系統(tǒng)中起主導(dǎo)作用。MIS 人機(jī)界面設(shè)計一般遵循以下一些基本原則： （ 1）以通信功能作為界面設(shè)計的核心 人機(jī)界面設(shè)計的關(guān)鍵是使人與計算機(jī)之間能夠準(zhǔn)確地交流信息。 例如在整個系統(tǒng)可以以問號圖標(biāo)表示幫助，以磁盤圖標(biāo)表示存盤，以打印機(jī)圖標(biāo)表示打印等。例如，人事管理系統(tǒng)中的“文化程度”是相對固定的數(shù)據(jù)，其值一般取“小學(xué)”、“初中”、“高中”、“大專”、“大本”、“碩研”、“博研”等。獨立開發(fā)的優(yōu)點是開發(fā)費用少，實現(xiàn)開發(fā)后的系統(tǒng)能夠適應(yīng)本單位的需求且滿意度較高，最為方便的是系統(tǒng)維護(hù)工作。 （ 3） .合作開發(fā) 合作開發(fā)方式適合于使用單位有一定的管理信息系統(tǒng)分析、設(shè)計及軟件開發(fā)人員，但開發(fā)隊伍力量較弱，希望通過管理信息系統(tǒng)的開發(fā)建立完善和提高自己的技術(shù)隊伍，便于系統(tǒng)維護(hù)工作的單位。 系統(tǒng)調(diào)研 新系統(tǒng)的系統(tǒng)分析 與系統(tǒng)設(shè)計工作都要建立在對現(xiàn)行系統(tǒng)調(diào)研的基礎(chǔ)上，即必須調(diào)查現(xiàn)行系統(tǒng)的運行情況、問題等，明確用戶的需求，特別是合作開發(fā)和委托開發(fā)方式。新系統(tǒng)的建立應(yīng)能解決大部分問題，并改善薄弱環(huán)節(jié)。 系統(tǒng)設(shè)計 系統(tǒng)設(shè)計又稱系統(tǒng)物理設(shè)計。 數(shù)據(jù)準(zhǔn)備與錄入工作主要是指由手工操作轉(zhuǎn)入計算機(jī)處理所需的各種數(shù)據(jù)的整理、錄入及計算機(jī)系統(tǒng)中為新系統(tǒng)所用數(shù)據(jù)的轉(zhuǎn)換工作。系統(tǒng)管理包括員工管理和部門管理。 （ 5）系統(tǒng)維護(hù)模塊 用戶可以添加或修改登陸時的用戶名和密碼。系統(tǒng)應(yīng)易于修改、易于擴(kuò)充、易于維護(hù)，能夠適應(yīng)業(yè)務(wù)不斷發(fā)展變化的需要。 關(guān)系數(shù)據(jù)庫是以關(guān)系模型為基礎(chǔ)的數(shù)據(jù)庫，是根據(jù)表、記錄和字段之間的關(guān)系進(jìn)行組織和訪問的一種數(shù)據(jù)庫，它通過若干個表（ Table） 來存取數(shù)據(jù)，并且通過關(guān)系（ Relation） 將這些表聯(lián)系在一起，關(guān)系數(shù)據(jù)庫提供了成為機(jī)構(gòu)化查詢語言（ SQL） 標(biāo)準(zhǔn)接口，該接口允許使用多種數(shù)據(jù)庫工具和產(chǎn)品，關(guān)系數(shù)據(jù)庫是目前最廣泛應(yīng)用的數(shù)據(jù)庫。部門信息可以對部門添 加 、 修 改 和 刪 除 ， 部 門 管 理 界 面 如 圖 ： 圖 具體編碼 如下 ： （ 1） “ 添加新部門 ”按鈕控件源代碼： Private Sub Command1_Click() If = Then Exit Sub End If If Then Exit Sub End If End Sub （ 2）“刪除所選”按鈕控件源代碼： Private Sub Command2_Click() If = Then Exit Sub End If End Sub 模塊編碼設(shè)計 該模塊細(xì)分為“錄入員工工資”和“修改工資記錄” 錄入員工工資 “錄入員工工資”功能是對某一個員工的工資情況進(jìn)行錄入，界面如圖 所示： 圖 具體編碼如下： （ 1） 窗體初始化： Private Sub Form_Load() Dim MsgText As String Dim intCount As Integer Dim dateTemp As Date Dim db As Database Dim res As Recordset Set db = OpenDatabase( + \) Set res = (bumen) If Not Then Do While Not cboItem(0).AddItem Trim(res!部門 ) Loop cboItem(0).ListIndex = 0 Else MsgBox 請先進(jìn)行員工檔案登記 ！ , vbOKOnly + vbExclamation, 警告 = False Exit Sub End If mblChange = False End Sub （ 2） 兩個下拉菜單源代碼： Private Sub cboItem_Click(Index As Integer) Dim MsgText As String Dim intCount As Integer Dim db As Database Dim res As Recordset Dim strsql As String Set db = OpenDatabase( + \) strsql = select 姓名 ,員工號 ,基本工資 from ygshuju where 部門 like 39。 ) Then If Not IsDate(txtItem(13)) Then MsgBox 時 間 輸 入 格 式 不 正 確 ， 應(yīng) 輸 入 如 下 格 式（ yyyymmdd）！ , vbOKOnly + vbExclamation, 警告 txtItem(13).SetFocus Exit Sub Else txtItem(13) = Format(txtItem(13), yyyymmdd) End If Else MsgBox 時間不能為空！ , vbOKOnly + vbExclamation, 警告 txtItem(13).SetFocus Exit Sub End If Set db = OpenDatabase( + \) 39。有變化設(shè)置 gblchange mblChange = True If (Index = 0 And Index 8) O