【正文】 =d1+d2+d3+d4local d1,d2,d3,d4d1=alltrim()d2=alltrim()d3=alltrim()d4=alltrim()=d1+d2+d3+d4 GetZP = GETFILE(39。 KEY CTRL+C, Ctrl+C 。 KEY CTRL+Z, Ctrl+Z 。 KEY ALT+Q, ALT+QDEFINE BAR 2 OF (a_menupops[3]) PROMPT 駕駛員名冊(cè)(\J)...DEFINE BAR 3 OF (a_menupops[3]) PROMPT 機(jī)動(dòng)車備案清單(\C)DEFINE BAR 4 OF (a_menupops[3]) PROMPT 事故統(tǒng)計(jì)表(\S)ON SELECTION BAR 1 OF (a_menupops[3]) report form dw noconsole previewON SELECTION BAR 2 OF (a_menupops[3]) report form jsy noconsole previewON SELECTION BAR 3 OF (a_menupops[3]) report form jdc noconsole previewON SELECTION BAR 4 OF (a_menupops[3]) report form sg noconsole previewDEFINE POPUP (a_menupops[4]) MARGIN RELATIVE SHADOW COLOR SCHEME 4DEFINE BAR 1 OF (a_menupops[4]) PROMPT 更改密碼(\P)... 。 KEY ALT+C, ALT+C 。 KEY ALT+Q, ALT+Q 。 MESSAGE 輸入企事業(yè)單位、機(jī)動(dòng)車、駕駛員備案信息DEFINE BAR 2 OF (a_menupops[1]) PROMPT 編輯數(shù)據(jù)(\E)... 。 IN LOCFILE(\BS\MAINMENU ,MPX。 KEY ALT+S, DEFINE PAD _04n0zaqia OF () PROMPT 幫助(\H) COLOR SCHEME 3 。 KEY ALT+V, ALT+V 。閱讀此菜單 MPR 文件的頭部分，可以獲得詳細(xì)信息。form39。 .ToolBars[11,1] = 39。 .ToolBars[9,1] = 39。 .ToolBars[7,1] = 39。 .ToolBars[5,1] = 39。 .ToolBars[3,1] = 39。二、 參考文獻(xiàn)：《》 清華大學(xué)出版社 李加福、邸學(xué)峰著《》 北京希望電腦公司 Microsoft Corporation《》 清華大學(xué)出版社 吳迪、曲蒙著《》 北京航空航天大學(xué)出版社 徐培忠著三、 附錄（原程序）主表單:Name = Form1PROCEDURE InitSET SYSMENU OFF SET SYSMENU TO SET TALK OFFSET DELETE OFFSET EXACT OFFSET CONFIRM OFFSET SAFETY OFF SET STATUS BAR OFF SET MULTILOCK ON SET DEFA TO C:\BSDO WITH THIS, .T.ENDPROCPROCEDURE LoadLOCAL iWITH THIS .ToolBars[1,1] = 39。本程序也經(jīng)過(guò)了我較為大量的測(cè)試，每次發(fā)現(xiàn)問(wèn)題后我都耐心的尋找問(wèn)題所在，然后予以一一解決。代碼如下：=if +0 =+5endif本界面中單擊作者的Email地址，即可調(diào)用用戶機(jī)上缺省的郵件處理程序來(lái)給作者發(fā)送郵件。功能實(shí)現(xiàn)：在這一功能模塊中要備份的數(shù)據(jù)包括數(shù)據(jù)表文件和報(bào)表文件等，并分別設(shè)置了備份到不同的位置，Ａ:盤、Ｃ:盤、Ｄ:盤共三個(gè)出口，主要操作命令是在程序中運(yùn)行操作系統(tǒng)”Copy”命令 ，復(fù)制結(jié)束后通過(guò)Ａctive windows 命令再返回到本系統(tǒng)的主窗體，這樣操作員就很方便的將數(shù)據(jù)備份了，即方便了數(shù)據(jù)流通又保證了數(shù)據(jù)安全。那么，其它窗體是怎樣傳遞這一信息的呢？我在每一個(gè)可設(shè)置背景的窗體的Ａctive事件中判別這上公共變量是否為空，如果不為空則通過(guò)命令設(shè)置窗體的Ｐicture屬性，這樣窗體的背景顏色就改變了。具體到數(shù)據(jù)表數(shù)據(jù)的增加、修改和刪除與其它數(shù)據(jù)表是一樣的。事故月報(bào)表是將事故記錄根據(jù)月份進(jìn)行分組輸出。其設(shè)計(jì)思想與事故查詢基本相同。在這個(gè)表單中的數(shù)據(jù)環(huán)境是“事故記錄”表和“駕駛員情況”表通過(guò)駕駛證號(hào)關(guān)聯(lián)。駕駛證號(hào)查詢是為了查找某個(gè)駕駛的事故記錄。主要代碼：刪除操作local ndo case case =1 n= case =2 n= case =3 n= case =4 n=endcaseyn = messagebox(是否確定刪除 39。操作方法如下：以駕駛員數(shù)據(jù)修改為例（二）刪除數(shù)據(jù)：要?jiǎng)h除某個(gè)駕駛員的數(shù)據(jù)應(yīng)先在表格空件中指定，即在該記錄上單擊，然后點(diǎn)“刪除“按鈕，系統(tǒng)此時(shí)提示是否真的刪除這個(gè)人的信息，回答“是“則該信息從原始數(shù)據(jù)表中刪除。（四）事故記錄信息：事故信息的輸入與單位信息的輸入的設(shè)計(jì)思想與操作方法基本相同。會(huì)員信息輸入完畢后，返回其父表單。其次，增加了會(huì)員輸入。字段輸入后單擊“保存”鈕結(jié)束本次新增操作。所以我將單位代碼的輸入變?yōu)椤皡^(qū)縣號(hào)”、“地區(qū)號(hào)”、“分組號(hào)”和“單位號(hào)”四項(xiàng)分別輸入，其中區(qū)縣號(hào)由下拉列表框選則輸入，系統(tǒng)可根據(jù)選則自動(dòng)形成代碼，四個(gè)代碼輸入后單位代碼自動(dòng)產(chǎn)生，這樣即方便操作又不易出錯(cuò)。 4．統(tǒng)一界面，如藍(lán)色標(biāo)簽字段為關(guān)鍵性字段，通過(guò)與其它字段顏色不同，提示操作員必須輸入。 將第2,3, , 178。另外，權(quán)限低的操作員對(duì)于系統(tǒng)設(shè)置等部分操作無(wú)操作權(quán)，則通過(guò)廢止相應(yīng)的菜單項(xiàng)來(lái)進(jìn)行控制?！緯?huì)員信息】表與【駕駛員】表通過(guò)駕駛證號(hào)關(guān)聯(lián)，這樣便可查看會(huì)員的詳細(xì)情況。三、 數(shù)據(jù)庫(kù)設(shè)計(jì)：（一）創(chuàng)建表結(jié)構(gòu)[企業(yè)事業(yè)單位] 數(shù)據(jù)表字段結(jié)構(gòu)此數(shù)據(jù)表主要用來(lái)存貯備案的企事業(yè)單位的基本數(shù)據(jù)名稱類型長(zhǎng)度標(biāo)題dwbh字符8單位編號(hào)dwmc字符30單位名稱dwdz字符30單位地址zgld字符8主管領(lǐng)導(dǎo)lxdh字符15聯(lián)系電話gczs整數(shù)3公車總數(shù)sczs整數(shù)3私車總數(shù)[駕駛員信息] 數(shù)據(jù)表字段結(jié)構(gòu)此數(shù)據(jù)表主要用來(lái)存貯機(jī)動(dòng)車駕駛員的基本數(shù)據(jù)名稱類型長(zhǎng)度標(biāo)題xm字符8姓名xb字符2性別csrq日期8出生日期xzdz字符30現(xiàn)住地址dwbh字符8單位編號(hào)lxdh字符15聯(lián)系電話sfzh字符18身份證號(hào)qzrq日期8取證日期yxrq日期8有效日期zjcx字符 8準(zhǔn)駕車型jszh字符15駕駛證號(hào)zp通用4駕駛員照片[會(huì)員信息] 數(shù)據(jù)表字段結(jié)構(gòu)此數(shù)據(jù)表主要用來(lái)存貯駕駛員會(huì)員的基本數(shù)據(jù),僅有除駕駛員數(shù)據(jù)表之外的會(huì)員信息字段名稱類型長(zhǎng)度標(biāo)題hyzh字符8會(huì)員證號(hào)jszh字符15駕駛證號(hào)mz字符4民族whcd字符4文化程度f(wàn)hmc字符8分會(huì)名稱hyje整數(shù)4會(huì)員金額[機(jī)動(dòng)車信息] 數(shù)據(jù)表字段結(jié)構(gòu)此數(shù)據(jù)表主要用來(lái)存貯備案的公有企事業(yè)單位的基本數(shù)據(jù)名稱類型長(zhǎng)度標(biāo)題cphm字符8車牌號(hào)碼cpxh字符10廠牌型號(hào)cllx字符8車輛類型clys字符4車輛顏色syq字符2所有權(quán)cz字符30車主czdz字符30車主地址fzrq日期8發(fā)證日期bsrq日期8報(bào)損日期[事故記錄](méi)此表用來(lái)存放駕駛員的事故記錄名稱類型長(zhǎng)度標(biāo)題jszh字符15駕駛證號(hào)cphm字符10車牌號(hào)碼sgbh字符6事故編號(hào)sgsj日期8事故時(shí)間sgdj字符2事故等級(jí)sgjs備注4事故簡(jiǎn)述[密碼表]此數(shù)據(jù)表存貯密碼數(shù)據(jù)主要用來(lái)設(shè)置可以操作本系統(tǒng)的人員及權(quán)限名稱類型長(zhǎng)度標(biāo)題mm字符6密碼qx字符1權(quán)限[區(qū)縣代號(hào)]此數(shù)據(jù)表用來(lái)存貯各個(gè)區(qū)縣的代號(hào)，是個(gè)靜態(tài)數(shù)據(jù)表，主要用來(lái)方便用戶輸入企事業(yè)單位的基本數(shù)據(jù)名稱類型長(zhǎng)度標(biāo)題qxmc字符6區(qū)縣名稱qx