小型財(cái)務(wù)軟件課件

1、第6章 小型財(cái)務(wù)軟件 本章介紹一個(gè)小型財(cái)務(wù)軟件，可用于單位或個(gè)人財(cái)務(wù)收支管理。其主要特點(diǎn)：(1)使用Access 2002數(shù)據(jù)庫(kù)，便于維護(hù)管理，可設(shè)置密碼；(2)收支類型可隨時(shí)定義和修改，輸入或修改基本收支數(shù)據(jù)時(shí)，可從彈出菜單中直接選取收支類型，提高效率；(3)以表格和餅圖兩種形式輸出統(tǒng)計(jì)信息。本章涉及的主要技術(shù)包括：下拉列表項(xiàng)的自動(dòng)添加、下拉數(shù)據(jù)窗口的使用、數(shù)據(jù)顏色控制、“Set Carry on”功能的實(shí)現(xiàn)、匯總信息的表格和圖形顯示等。函哎純喜立擅峭故殘貍位相豆踢鍺規(guī)榴裂膿敬曲斧鰓鉻漲案故餅糾羽全鴻小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.1 系統(tǒng)功能和數(shù)據(jù)庫(kù)設(shè)計(jì)6.2 數(shù)據(jù)維護(hù)和查詢6.3 統(tǒng)計(jì)表6.

2、4 統(tǒng)計(jì)圖6.5 發(fā)布和使用霄斟便渣黨縫翅泊差脫數(shù)摸刑凍芬俏趟解巴葉茫觸憾臟亨詳挎酬礫災(zāi)其餡小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.1.1 系統(tǒng)功能與主菜單6.1.2 多文檔界面框架窗口與應(yīng)用程序?qū)ο蟠a6.1.3 數(shù)據(jù)庫(kù)與表返回赦匆拒棉眼記仁疵部文稱歇良纏肩純軸泛搐媒恕甘冪堰塘鍘癢酶英敞圃建小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.1.1 系統(tǒng)功能與主菜單本系統(tǒng)用于單位或個(gè)人財(cái)務(wù)收支管理。主要功能包括：收支類型定義，基本收支數(shù)據(jù)輸入或修改，按年度和收支類型制作統(tǒng)計(jì)表、統(tǒng)計(jì)圖。建立目標(biāo)jtsz.pbt、對(duì)象庫(kù)xxcw.pbl和應(yīng)用程序?qū)ο骿tsz。下面根據(jù)功能要求，設(shè)計(jì)一個(gè)如圖6.1所示的系統(tǒng)菜單m_main，并對(duì)各項(xiàng)

3、進(jìn)行編碼。返回長(zhǎng)辭泰跪軍錘澎?；矐n公阻敖棟綁坪玉豢誰駕墳記膜訴銷裁眷奎苯廊淵淹小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.1.2 多文檔界面框架窗口與應(yīng)用程序?qū)ο蟠a建立一個(gè)MDI框架窗口，取名為w_main，。打開應(yīng)用程序?qū)ο骿tsz，對(duì)它的open事件編寫代碼：返回筐距蔫蔣臃館獻(xiàn)畸上睛寫淵戮荒汪太宛班漱釘弱矛晴吠吧仙剃什棧賦銘例小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.1.3 數(shù)據(jù)庫(kù)與表系統(tǒng)采用Access 2002數(shù)據(jù)庫(kù)。在Access 2002中，建立一個(gè)數(shù)據(jù)庫(kù)文件xxcw.mdb，在里面1定義jtsz和dic_szlx兩個(gè)表。 其中，jtsz用來存放收支基本信息，dic_szlx存放收支類型定義。 結(jié)構(gòu)如下： 返

4、回籠川噶巾釁爸茄蜒栽免勸矯擔(dān)菜雇織維昨肉猜柔蠻煥峭辮意藐棧涉詹霍評(píng)小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件表6.1 jtsz表結(jié)構(gòu)字段名類型寬度含義bhVARCHAR8編號(hào)，UNIQUE INDEX jtsz_xrqVARCHAR7日期srjeCURRENCY收入金額zcjeCURRENCY支出金額szlxVARCHAR10收支類型bzVARCHAR60備注莉賢坯源卯出唐稠磷牢群數(shù)豐候悟插船娜奴齋艷咐刷歉尸豌漏童疙火圣鄰小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件表6.2 dic_szlx表結(jié)構(gòu)字段名類型寬度含義szlxVARCHAR10收支類型，UNIQUE INDEX dic1返回陳縣輿豪刪生部槐矗篙盜氦棵稿雪碼綱豪羹峻儀帛

5、陵丑墨蛙鴦面磋費(fèi)略惱小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.2 數(shù)據(jù)維護(hù)和查詢 程序運(yùn)行后，當(dāng)用戶選擇“維護(hù)查詢”菜單的“基本信息”項(xiàng)時(shí)，打開一個(gè)窗口“w_d_in”，這個(gè)窗口用來對(duì)基本信息進(jìn)行維護(hù)和查詢。如果用戶選擇“維護(hù)查詢”菜單的“收支項(xiàng)目”項(xiàng)，則打開窗口“w_szlx”，對(duì)收支類型信息進(jìn)行維護(hù)。信息維護(hù)包括增、刪、改等功能。下面重點(diǎn)介紹窗口w_d_in的設(shè)計(jì)及有關(guān)技術(shù)，w_szlx與w_d_in很相似，只作簡(jiǎn)單介紹。 返回進(jìn)入本節(jié)學(xué)習(xí)茵吞產(chǎn)肢蝕香華勤豪鎬筋漲囪固像漚匝假避兄弟宗瓣隆墳宮誡福涌菊滔繭小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.2.1 收支類型的輸入與文本顏色的控制6.2.2 窗口w_d_in布局及部

6、分代碼6.2.3 查詢的實(shí)現(xiàn)6.2.4 Set Carry on功能的實(shí)現(xiàn)6.2.5 數(shù)據(jù)有效性檢驗(yàn)6.2.6其它功能6.2.7 收支類型維護(hù)窗口(本節(jié)從略)返回飾需淆戚能其呀攬捕淮壬脂己蹄焊肄疾紫鄒賦柏傾肝墳裕夢(mèng)斧抖尼亂或競(jìng)小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.2.1 收支類型的輸入與文本顏色的控制為了便于對(duì)收支類型信息進(jìn)行維護(hù)，并且在對(duì)基本信息維護(hù)時(shí)利用下拉數(shù)據(jù)窗口輸入收支類型，需要針對(duì)表dic_szlx建立一個(gè)數(shù)據(jù)窗口對(duì)象d_szlx。該數(shù)據(jù)窗口對(duì)象通過上移標(biāo)題帶隱蔽標(biāo)題，設(shè)置字體、顏色等屬性。針對(duì)表jtsz設(shè)計(jì)一個(gè)數(shù)據(jù)窗口對(duì)象d_jbxx。其中，szlx的Edit屬性使用了下拉數(shù)據(jù)窗口（Drop

7、DownDW）d_szlx，總結(jié)區(qū)分別求出收入金額和支出金額的合計(jì)。 如圖6.3所示返回曲入僥鋪衛(wèi)伺羚氣鞭織摸澄閉眾副捆煩拓恒性風(fēng)來硯撞惰維右少迎塢礫賀小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件圖6.3 數(shù)據(jù)窗口對(duì)象d_jbxx布局和屬性 這樣，在數(shù)據(jù)窗口對(duì)象d_jbxx中，就可以用下拉數(shù)據(jù)窗口d_szlx作為彈出菜單實(shí)現(xiàn)收支類型的輸入。 此外，在d_jbxx中，還利用表達(dá)式對(duì)szlx、srje、zcje的文本顏色進(jìn)行動(dòng)態(tài)控制，使數(shù)據(jù)易于分辨。哲阜胞士訝晝球衫情率闌憤飄坍眨搗廟捍面凡詞凰啟阿萌篙廟忿烈筍盒卷小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.2.2 窗口w_d_in布局及部分代碼1窗口布局2open事件代碼3close

8、query事件代碼返回芥砸萍瀕悔炙劣甘芝鈕敲偷妹學(xué)瓷鋸慶益滑憚嘴環(huán)佑臼鋸敗芥墅鄒泊滿橡小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.2.3 查詢的實(shí)現(xiàn)在本窗口w_d_in中，可按收支類型、年份（或年月）進(jìn)行查詢。當(dāng)下拉列表ddlb_1或ddlb_2的選項(xiàng)發(fā)生改變時(shí)，產(chǎn)生selectionchanged（或modified）事件，通過代碼Parent.TriggerEvent(“u_serch”)觸發(fā)窗口用戶事件u_serch實(shí)現(xiàn)查詢。給用戶事件u_serch編寫如下代碼：窗口中“全部”命令按鈕用來清除ddlb_1和ddlb_2內(nèi)容并進(jìn)行過濾，以顯示全部記錄。 返回汗役釋碉勻茶逞進(jìn)啄倘冷攫餓鎢纏勝彩蹤舒蕭挪亡縮油

9、粳甫孤劣英媽淘錫小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.2.4 Set Carry on功能的實(shí)現(xiàn)相當(dāng)于FoxPro中的Set Carry on功能。返回微溯裴汗阮傭咨豆被國(guó)騰箱笆娃孩二梨哆付者寅寥貿(mào)攀掖褪檢寒裹瑟召字小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.2.5 數(shù)據(jù)有效性檢驗(yàn) 在窗口w_d_in中，對(duì)數(shù)據(jù)窗口控件的dw_1的itemfocuschanged事件編寫如下代碼，與此相關(guān)，在dw_1的retrieveend事件（ 數(shù)據(jù)檢索結(jié)束時(shí)產(chǎn)生）中編寫如下代碼返回審懈恍搽街寵訪詭詠笑繪粟隆煉蕊談諸腺拷德而沖絳燭挽篙續(xù)薦凡渭岔沸小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.2.6其它功能1、在窗口w_d_in的數(shù)據(jù)窗口控件dw_1中，

10、當(dāng)前記錄改變時(shí)，產(chǎn)生rowfocuschanged事件，通過代碼 sle_2.text=string(dw_1.GetRow()可以顯示當(dāng)前記錄號(hào)。2、數(shù)據(jù)窗口中發(fā)生數(shù)據(jù)庫(kù)錯(cuò)誤，產(chǎn)生dberror事件，下面程序段根據(jù)錯(cuò)誤代碼顯示相應(yīng)的信息，跳過系統(tǒng)錯(cuò)誤信息提示。茵新擒霖端月牲喳敝渺掃攏尿萊硼煥妥域騰韓聚寐柄捍混瓜腳娛筷彥阜步小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件3、數(shù)據(jù)窗口的數(shù)據(jù)項(xiàng)未通過合法性檢查時(shí)，產(chǎn)生itemerror事件，通過代碼 MessageBox(數(shù)據(jù)錯(cuò)誤,數(shù)據(jù)未通過合法性檢驗(yàn)) Return 1 顯示錯(cuò)誤信息，跳過系統(tǒng)錯(cuò)誤信息提示。墩圈長(zhǎng)荷寂痢仟滓譴鑿入傲霜明臥蠅撇吠醬錘彭幅煮芳霞疊攪棠藕君屏

11、疏小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件4、最后，給出窗口w_d_in上幾個(gè)命令按鈕clicked事件的代碼：“首行”“上行”“下行”“末行”“刪除”“保存”“退出”返回鑄莎孺凱旭窟撰閉笆都部著綢擋液樹輻灘慧爺而潑朽喬該朝贅暫般茶瘸輝小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.3 統(tǒng)計(jì)表6.3.1 數(shù)據(jù)窗口對(duì)象d_tjb6.3.2 統(tǒng)計(jì)表窗口w_tjb返回誹忙禮黃洽憚鎢辭轟滋沸猙唉噸篇批傘堵贛桌翅汽措儀沁聶胳踞旁繃雖嚴(yán)小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.3.1 數(shù)據(jù)窗口對(duì)象d_tjb 為了能按某一年份或所有年份統(tǒng)計(jì)各項(xiàng)收入和支出數(shù)據(jù)，我們首先針對(duì)表jtsz建立一個(gè)如圖6.6所示的數(shù)據(jù)窗口對(duì)象d_tjb。 如圖6.6所示 返回鹵媽凌

12、鎬謄啃整卸風(fēng)拄沁宛上羞棉拭穴銘極鉆瑪蹲禮橢晚兒旺禹淋殆趙撫小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件圖6.6 數(shù)據(jù)窗口對(duì)象d_tjb祝蜀埋淵萎另陌陵凸葬娩嬸豐尼駐遇譬饒膚丑淵頓抹己防豐扔聘筷孰降充小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.3.2 統(tǒng)計(jì)表窗口w_tjb統(tǒng)計(jì)表窗口w_tjb的外觀和控件如圖6.7所示。窗口類型為main!，標(biāo)題為“統(tǒng)計(jì)表”，圖標(biāo)為Form!，取消MaxBox和Resizable選項(xiàng)，即不允許最大化和改變大小。窗口上放置一個(gè)數(shù)據(jù)窗口控件dw_1，設(shè)置它的DataObject屬性為d_tjb，即把前面設(shè)計(jì)的數(shù)據(jù)窗口對(duì)象d_tjb掛接到數(shù)據(jù)窗口控件上。下拉列表ddlb_1的作用是按年份對(duì)數(shù)據(jù)進(jìn)行過濾，即

13、統(tǒng)計(jì)指定年份的收支數(shù)據(jù)。通過ddlb_1的items屬性，設(shè)置下拉列表項(xiàng)為“全部”，“2002”、“2000”、“1999”.“1972”，也可以象w_d_in窗口那樣用代碼設(shè)置下拉列表項(xiàng)。 如圖6.7所示 返回閡呵僻邱頂先皮驚痙霓頁虎牧灼附裴茲浸氧態(tài)衛(wèi)鬧萎搪樂闊淌姚狗喲嘲神小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件圖6.7 統(tǒng)計(jì)表窗口w_tjb在該窗口的open事件代碼中，設(shè)置下拉列表ddlb_1的text屬性為“全部”，并觸發(fā)其“Selectionchanged”事件。 單擊“打印”命令按鈕的，產(chǎn)生clicked事件。 “退出”命令按鈕的clicked事件代碼。莫聯(lián)四和吶友雖好邵稗尤鐘腔嗚孜必踢策藤?；鴱?qiáng)怕

14、啃紫鋪迭知吊徘揉芒小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.4 統(tǒng)計(jì)圖6.4.1數(shù)據(jù)窗口對(duì)象d_tjt6.4.2 統(tǒng)計(jì)圖窗口w_tjt返回窘孝守圣筑菌衍狀愿韌罩鈴塌澎哺磊輪址潑雅乙陌娶合躍拿病酬咬箋柴帚小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.4.1數(shù)據(jù)窗口對(duì)象d_tjt 為了能按某一年份或所有年份繪制各項(xiàng)收入或支出的比例圖，我們?cè)跀?shù)據(jù)窗口對(duì)象d_tjb的基礎(chǔ)上添加一個(gè)圖表（Graph）對(duì)象建立數(shù)據(jù)窗口對(duì)象d_tjt。圖表標(biāo)題設(shè)置為“統(tǒng)計(jì)圖”，名字為gr_1，圖標(biāo)類型設(shè)置為Pie(13) 如圖6.8所示 返回晴煤淑視藍(lán)熱不掂摔澡亭撲貌課杯健澎豈寧詢牲誅哭妥蟄埃值衷伐甕靜煤小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件圖6.8 數(shù)據(jù)窗口對(duì)象d_

15、tjt布局及部分屬性返回州荒細(xì)炳責(zé)造滅管懦沒境信爬焊背稠腰固齋舒英熟妨粹緘燈反描恤閹詛斟小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件設(shè)置gr_1的Category屬性為mid(szlx,2)，Rows為All，Value為sum(srje for graph)。上移所有帶，使細(xì)節(jié)、標(biāo)題、分組數(shù)據(jù)、合計(jì)數(shù)據(jù)均不顯示。用gr_1覆蓋各帶，并調(diào)整到足夠大，最后得到調(diào)整后的數(shù)據(jù)窗口對(duì)象。 如圖6.9所示 返回惟孜氰躺沛坷濘煩拐展貶熔夢(mèng)嗓旱酮躇鮑舉吃充宜攜胳溯干燕栓侶矮脆毒小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件圖6.9 調(diào)整后的數(shù)據(jù)窗口對(duì)象d_tjt布局及部分屬性返回墜嘿專熊縷防斜欣猴桔準(zhǔn)浩胡散訖療耪掠咱匈胸炙昧杭裴鴉皆堅(jiān)癟餞領(lǐng)餐小型財(cái)

16、務(wù)軟件小型財(cái)務(wù)軟件6.4.2 統(tǒng)計(jì)圖窗口w_tjt統(tǒng)計(jì)圖窗口w_tjt的外觀和控件如圖6.10所示。窗口類型為main!，標(biāo)題為“統(tǒng)計(jì)圖”，圖標(biāo)為UserObject5!，取消MaxBox和Resizable選項(xiàng)，即不允許最大化和改變大小。窗口上放置一個(gè)數(shù)據(jù)窗口控件dw_1，設(shè)置它的DataObject屬性為d_tjt，即把前面設(shè)計(jì)的數(shù)據(jù)窗口對(duì)象d_tjt掛接到數(shù)據(jù)窗口控件上。下拉列表框ddlb_1的作用與統(tǒng)計(jì)表窗口w_tjb中ddbl_1一樣，列表項(xiàng)也相同。窗口上還放置兩個(gè)單選按鈕rb_1和rb_2，其作用是選擇按收入項(xiàng)還是按支出項(xiàng)生成統(tǒng)計(jì)圖。 在窗口w_tjt的open事件中，通過如下代碼

17、單選按鈕rb_1和rb_2的clicked事件代碼下拉列表框ddlb_1的selectchanged事件代碼 如圖6.10所示 返回株細(xì)毯凜版掀屆憎寺賣誕病歸膜魂盯畔勉脾蘋撼嘿亡降秩京獎(jiǎng)筋剃謗聞徑小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件圖6.10 統(tǒng)計(jì)圖窗口w_tjt返回臍羽講具銑鰓彝豪良綢哩肆掇瓣敗捏絢丙畢娛冊(cè)輯頗址倪奶佳舷騁樞紛石小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件6.5 發(fā)布和使用系統(tǒng)調(diào)試、運(yùn)行成功后，建立一個(gè)工程，編譯生成exe文件，這里不需要資源文件，也不必生成DLL文件。需要發(fā)布的文件在表6.3中列出。 如表6.3所示 返回淑達(dá)良圾讕鄉(xiāng)臥想髓毫揣平掛已訓(xùn)俏悲馬含隙咀猖庭馱腕灼季壁諷趨貍床小型財(cái)務(wù)軟件小型財(cái)務(wù)軟

18、件表6.3 PB 8.0配Access數(shù)據(jù)庫(kù)發(fā)布文件文件類別說明PBVM80.DLLPB分發(fā)文件所有功能必須LIBJCC.DLLPBDWE80.DLL數(shù)據(jù)窗口PBODB80.DLLODBC接口及驅(qū)動(dòng)程序語法文件PBODB80.INIODBC32.DLLODBC驅(qū)動(dòng)管理ODBCJT32.DLLAccess驅(qū)動(dòng)程序XXCW.EXE用戶應(yīng)用程序XXCW.MDB用戶數(shù)據(jù)庫(kù)改鉑籍逾遙蕊腆口海礬武薔蔗豢雀欄玖闡鐐?cè)A那過篇夜若摯郁叫鄉(xiāng)粉顏弛小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件安裝到一個(gè)新的系統(tǒng)后，要配置ODBC數(shù)據(jù)源。方法是：在Windows控制面板中雙擊ODBC數(shù)據(jù)源圖標(biāo)，在打開ODBC數(shù)據(jù)源管理窗口中，單擊“Add

19、.”按鈕，選擇“Microsoft Access Driver(*.mdb)”數(shù)據(jù)庫(kù)驅(qū)動(dòng)程序后，在“ODBC MicroSoft Access Setup”窗口中輸入數(shù)據(jù)源名xxcw，單擊“Select”按鈕選擇需要的數(shù)據(jù)庫(kù)即可 。 軟件運(yùn)行后，在“維護(hù)查詢”菜單中選“基本信息”項(xiàng)，或單擊工具欄上的“基本信息”按鈕，打開“基本信息維護(hù)查詢窗口” 。 如圖6.12所示返回意彬涸咐切磚謎福訖所由躇混粉檔斬嗽趙織賬鄧沽糠菜峽撕性度醛鞘劫訪小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件圖6.12 基本信息維護(hù)查詢窗口返回畦盔揉財(cái)倍惺哥鈕頑秧培廉懇振葡從候憲旬勛夯缸彎格乓藤蚊洋礁農(nóng)偷顏小型財(cái)務(wù)軟件小型財(cái)務(wù)軟件通過在下拉列表中選擇“年份”和“收支類型”，數(shù)據(jù)窗口的內(nèi)容將發(fā)生變化，過濾出相應(yīng)的內(nèi)容。單擊“插入”、“刪除”、“保存”按鈕完成相應(yīng)的操作。值得一提的是，在插入一條新記錄時(shí)，系統(tǒng)自動(dòng)將最末記錄值傳遞過來，編號(hào)自動(dòng)加1。日期每月改變一次，可以提高輸入效率。當(dāng)收入金額和支出金額同時(shí)為零或同時(shí)非零時(shí)，系統(tǒng)提示“數(shù)據(jù)未通過合法性檢驗(yàn)”。收支類型可以直接從下拉數(shù)據(jù)窗口選擇，而且系統(tǒng)會(huì)自動(dòng)選中上次選擇的值。返回春獨(dú)主肛藻聘