以齊化集團(tuán)汽車(chē)衡稱(chēng)量系統(tǒng)為例，介紹了利用Visual Basic 6. 0高級(jí)可視化語(yǔ)言及Mic-iosoft Access2000數(shù)據(jù)庫(kù)實(shí)現(xiàn)微機(jī)控制下的大噸位車(chē)輛的精確測(cè)量，主要闡述了該系統(tǒng)的軟件編 制、操作及數(shù)據(jù)維護(hù)，對(duì)同類(lèi)系統(tǒng)的完善和開(kāi)發(fā)具有一定的借鑒意義。

我公司60噸汽車(chē)衡于1999年建成使用，設(shè)備 采用廂式臺(tái)面和數(shù)據(jù)采集儀 表UME1705表。為了適應(yīng)公司計(jì)量管理的需要，微 機(jī)軟件稱(chēng)量系統(tǒng)由公司自行編制，該系統(tǒng)經(jīng)過(guò)試運(yùn) 行和不斷升級(jí)，已經(jīng)趨于成熟，完全滿(mǎn)足了計(jì)量的準(zhǔn) 確性和數(shù)據(jù)安全性的要求。

本系統(tǒng)通過(guò)微機(jī)RS232(串行口）口與UME1705 數(shù)據(jù)采集儀表進(jìn)行通訊，做到微機(jī)與儀表的同步顯 示，編程時(shí)從串口采集數(shù)據(jù)，然后進(jìn)行數(shù)據(jù)處理。軟 件采用Visual Basic 6. 0(中文企業(yè)版)高級(jí)可視化語(yǔ) 言編寫(xiě)，數(shù)據(jù)庫(kù)米用Miciosoft Access2000，界面主要 分為以下幾個(gè)部分。

1.稱(chēng)量部分

稱(chēng)量部分，如圖1所示。

車(chē)輛上稱(chēng)前保證儀表預(yù)熱并歸零，當(dāng)線(xiàn)路正常 時(shí)，在微機(jī)屏幕上以大字體顯示當(dāng)前重量(0Kg)，車(chē) 上稱(chēng)后動(dòng)態(tài)顯示重量變化，一旦車(chē)輛停穩(wěn)即可確認(rèn) 重量，這一過(guò)程由通訊控件mscomm完成，波特率視 儀表情況一般設(shè)為9600，由窗體上的Timer控件循 環(huán)采集，一經(jīng)確認(rèn)Timer停止計(jì)時(shí)。

程序運(yùn)行時(shí)，第一次上秤被認(rèn)為是空車(chē)同一車(chē) 號(hào)第二次上秤被認(rèn)為是重車(chē)?？哲?chē)時(shí)只需輸入車(chē) 號(hào)，并放入當(dāng)日空車(chē)的表格(Dtgrid)中，點(diǎn)擊其中某 一車(chē)號(hào)，可看到該車(chē)的歷史稱(chēng)量記錄，便于核對(duì)車(chē)皮 的變化。重車(chē)時(shí)必須選擇品名、提貨單位，程序自動(dòng) 計(jì)算出凈重，其中提貨單位是動(dòng)態(tài)追加和自動(dòng)匹配 的，只要打入前幾個(gè)字即可快速定位到此單位，大大 減輕了手工錄入的煩瑣和不準(zhǔn)確性；同時(shí)為輸入車(chē) 號(hào)方便，把一些常用的車(chē)號(hào)字頭如“黑B”等做成按 鈕(Command),只要點(diǎn)擊即可錄入，待全部錄入完 畢，會(huì)在左側(cè)顯示一預(yù)覽表格，包括車(chē)號(hào)、皮重、凈 重、提貨單位、品名，之后選擇打印份數(shù)就可以打印 出計(jì)量單，此單上自動(dòng)加入了打印時(shí)間，此時(shí)也可以 選擇0份數(shù)，留作以后補(bǔ)打。

程序自動(dòng)判斷打印內(nèi)容的高度，打印完畢立即 終止走紙。計(jì)量單標(biāo)題與正文采用不同的字體字號(hào) 便于區(qū)分。

程序以Data數(shù)據(jù)控件來(lái)連接數(shù)據(jù)庫(kù)文件，減輕 了編寫(xiě)代碼的工作量。

2.數(shù)據(jù)查詢(xún)

（1）綜合查詢(xún):按照車(chē)號(hào)、提貨單位、時(shí)間范圍、 品名進(jìn)行組合查詢(xún)，條件為空時(shí)被認(rèn)為是包括所有， 當(dāng)有滿(mǎn)足條件的記錄時(shí)，會(huì)在下面的表格中顯示該 時(shí)間范圍內(nèi)的詳細(xì)稱(chēng)車(chē)記錄，若需要可點(diǎn)擊相應(yīng)記 錄執(zhí)行補(bǔ)打，點(diǎn)擊表格的標(biāo)題可以按照相應(yīng)標(biāo)題進(jìn) 行排序，便于快速定位。為滿(mǎn)足數(shù)據(jù)交流的需要，可 把此查詢(xún)表格導(dǎo)入到電子表格Excel2000中，但只有 系統(tǒng)維護(hù)人員才能打開(kāi)。

（2）分類(lèi)統(tǒng)計(jì):輸入時(shí)間范圍，會(huì)統(tǒng)計(jì)出該時(shí)間 范圍內(nèi)所有品名的累計(jì)凈重和車(chē)次，便于進(jìn)行銷(xiāo)量統(tǒng)計(jì)和對(duì)比盤(pán)存。

3.數(shù)據(jù)維護(hù)

(1)數(shù)據(jù)備份:把主計(jì)量庫(kù)、品名庫(kù)、提貨單位庫(kù) 等復(fù)制到任何磁盤(pán)介質(zhì)中，如軟盤(pán)、其它硬盤(pán)、USB 盤(pán)等，備份路徑由維護(hù)人員進(jìn)行更改。

（2）通訊口 ：當(dāng)前串口出現(xiàn)故障時(shí)，可立即更改 為另一串口，如COM2 口，以保證稱(chēng)量。

（3）系統(tǒng)時(shí)間：由維護(hù)人員更改系統(tǒng)時(shí)間，以保 證時(shí)間的準(zhǔn)確。

⑷打開(kāi)控制面板：當(dāng)需更換打印機(jī)等項(xiàng)時(shí)，由 維護(hù)人員進(jìn)入控制面板進(jìn)行相應(yīng)的設(shè)置。

(5)增加品名：新增產(chǎn)品時(shí)，輸入一個(gè)非重復(fù)的 品名會(huì)追加到品名數(shù)據(jù)庫(kù)并立即生效。

4.超級(jí)管理

此項(xiàng)功能僅限系統(tǒng)管理員使用，為完成以下功 能，充分利用了 Windows API函數(shù)以及注冊(cè)表操作， 達(dá)到了安全操作的目的。

（1）開(kāi)機(jī)選項(xiàng):可設(shè)置開(kāi)機(jī)自動(dòng)運(yùn)行，程序退出 時(shí)自動(dòng)關(guān)機(jī)。

（2）桌面選項(xiàng):隱藏/顯示桌面，使操作員無(wú)法操 作桌面。

（3）任務(wù)欄：程序運(yùn)行時(shí)關(guān)閉任務(wù)欄，包括系統(tǒng) 托盤(pán)和開(kāi)始按鈕，并可根據(jù)需要隨時(shí)顯示出來(lái)，同時(shí) 屏蔽了 CTRL+ALT +DEL組合鍵，防止操作員非法 關(guān)閉稱(chēng)量程序，還避免了稱(chēng)量程序的多次加載。

⑷打開(kāi)數(shù)據(jù)庫(kù)：可用Access2000打開(kāi)本程序的 數(shù)據(jù)庫(kù)，修改結(jié)構(gòu)、建立索引、導(dǎo)入導(dǎo)出等。

(5 )命令行:通過(guò)shell語(yǔ)句調(diào)用Windows下的標(biāo) 準(zhǔn)程序。