【正文】 d amp。對(duì)于所有的公共對(duì)話框，當(dāng)CancelError屬性為true，而且用戶(hù)單擊了對(duì)話框的“取消”按鈕時(shí)將生成一個(gè)錯(cuò)誤。程序模塊的編制中，重點(diǎn)把握系統(tǒng)內(nèi)部完整性、功能性、實(shí)用性、便捷性，使其能夠協(xié)調(diào)統(tǒng)一、運(yùn)行無(wú)誤。這個(gè)控件可以顯示“打開(kāi)”和“另存為”對(duì)話框，可以在打開(kāi)對(duì)話框之前用Filter屬性指定在“文件類(lèi)型”列表框中顯示的文件過(guò)濾器列表。 Call othertopic Call showother(sql) Case 2 sql = select * from salarystatistics where stuffid=39。 Set rs = getrs(sql, salary) While Not rs(0) Wend sd = rs(0) = 0 Select Case Case 0 sql = select * from salarysetting where stuffid=39。如果要選擇“刪除基本工資設(shè)置”，出現(xiàn)如下的提示：具體的操作這里就不詳細(xì)介紹。 amp。如果系統(tǒng)還沒(méi)有統(tǒng)計(jì)工資，那么系統(tǒng)開(kāi)始統(tǒng)計(jì)工資，然后在信息結(jié)果列表窗體中顯示統(tǒng)計(jì)結(jié)果。 =provider=。If strusername admin Thensql = select sid from stuffinfo where sname=39。 and amp。 amp。If = And IsNumeric() = True Then MsgBox 請(qǐng)輸入正常加班工資百分比, vbOKOnly + vbExclamation, 提示 = ElseIf = And IsNumeric() = False Then MsgBox 請(qǐng)輸入特殊加班工資百分比, vbOKOnly + vbExclamation, 提示 = ElseIf = And IsNumeric() = False Then MsgBox 請(qǐng)輸入出差工資, vbOKOnly + vbExclamation, 提示 = ElseIf = And IsNumeric() = False Then MsgBox 請(qǐng)輸入曠工扣發(fā)工資, vbOKOnly + vbExclamation, 提示 = ElseIf = And IsNumeric() = False Then MsgBox 請(qǐng)輸入遲到早退扣發(fā)工資, vbOKOnly + vbExclamation, 提示 = Else Call setvalue Call init End If選擇“工資信息管理”—“出勤統(tǒng)計(jì)”菜單，在統(tǒng)計(jì)出勤記錄窗體中選擇需要統(tǒng)計(jì)記錄的月份。 amp。 39。) Call transactsql(sql, salary) MsgBox 添加成功, vbOKOnly + vbExclamation, 添加結(jié)果 = = = 選擇“系統(tǒng)”—“修改密碼”菜單，在修改密碼的窗體里，輸入舊密碼和2次輸入新密碼后，單擊“確定”按鈕，系統(tǒng)將會(huì)更改當(dāng)前用戶(hù)的密碼。 sql = insert into userinfo (userid,userpwd) values(39。通過(guò)標(biāo)題可以知道此系統(tǒng)的大概內(nèi)容，由此，登錄界面的設(shè)計(jì)完成。表6 AlterationInfo（員工調(diào)離情況表）序號(hào)字段名字段中文名類(lèi)型1AID員工編號(hào)文本2AName員工姓名文本3AOldDept原部門(mén)文本4ANewDept新部門(mén)文本5AOldPosition原職務(wù)文本6ANewPosition新職務(wù)文本7AOutTime調(diào)出時(shí)間日期/時(shí)間8AInTime調(diào)入時(shí)間日期/時(shí)間9ARemark備注備注 Salary數(shù)據(jù)庫(kù)（工資數(shù)據(jù)庫(kù)）（1） AttendanceStatistics（員工出勤表）：用于統(tǒng)計(jì)員工的出勤情況，為統(tǒng)計(jì)工資時(shí)提供方便。通過(guò)對(duì)企業(yè)員工管理內(nèi)容、工資管理內(nèi)容和過(guò)程的分析，本系統(tǒng)設(shè)計(jì)的實(shí)體和屬性如下及圖41和圖42：?jiǎn)T工（包括員工編號(hào)、員工姓名、性別、籍貫、年齡、生日、學(xué)歷、專(zhuān)業(yè)、住址、郵編、電話、Email、參加工作時(shí)間、進(jìn)入公司時(shí)間、起薪時(shí)間、備注）部門(mén)（員工編號(hào)、部門(mén)名稱(chēng)）職務(wù)（員工編號(hào)、職務(wù)名稱(chēng)）職稱(chēng)（員工編號(hào)、職稱(chēng)名稱(chēng)）工資結(jié)構(gòu)（員工編號(hào)、正常加班工資、特殊加班工資、出差工資、曠工工資、遲到早退）工資帳目（工資帳目代號(hào)、工資帳目名稱(chēng)）員工員工姓名性別員工編號(hào)籍貫?zāi)挲g生日學(xué)歷專(zhuān)業(yè)住址郵編電話Email參加工作時(shí)間進(jìn)入公司時(shí)間起薪時(shí)間備注圖3 員工信息圖部門(mén)部門(mén)代號(hào)部門(mén)名稱(chēng)職務(wù)職務(wù)代號(hào)職務(wù)名稱(chēng)職稱(chēng)職稱(chēng)代號(hào)職稱(chēng)名稱(chēng)工資賬目工資賬目代號(hào)工資賬目名稱(chēng)工資結(jié)構(gòu)員工編號(hào)正常加班工資特殊加班工資出差工資曠工工資遲到早退 圖4 工資管理內(nèi)容分析圖 實(shí)體和實(shí)體之間的關(guān)系ER圖部門(mén)屬于職稱(chēng)職務(wù)員工具有擔(dān)任具有工資結(jié)構(gòu)工資賬目具有 圖5 實(shí)體之間的關(guān)系ER圖 數(shù)據(jù)庫(kù)設(shè)計(jì)Access在VB中的應(yīng)用非常廣泛，為此我選用Access 2000數(shù)據(jù)庫(kù)來(lái)進(jìn)行數(shù)據(jù)庫(kù)的邏輯設(shè)計(jì)。概念性數(shù)據(jù)模型關(guān)心的是如何完整、正確地反映客觀實(shí)際情況，不關(guān)心在數(shù)據(jù)庫(kù)中如何實(shí)現(xiàn)。 系統(tǒng)管理功能（1）添加用戶(hù)：使用這個(gè)用戶(hù)登錄后，可以添加其他用戶(hù)（2）修改密碼：每一個(gè)用戶(hù)都可以更改自己的密碼 工資信息設(shè)置功能（1）基本工資設(shè)置：按照員工編號(hào)或職務(wù)設(shè)置員工的基本工資信息。其它項(xiàng)目設(shè)置有獎(jiǎng)金、津貼、福利、扣發(fā)等項(xiàng)目。 3 系統(tǒng)分析 系統(tǒng)需求分析本系統(tǒng)的開(kāi)發(fā)宗旨以及總體任務(wù)就是幫助企業(yè)的財(cái)務(wù)