本文介紹用VB Visual Basic)軟件開(kāi)發(fā)地磅稱(chēng)重軟件系統(tǒng)的一些做法。

目前地磅稱(chēng)重計(jì)量在造 紙企業(yè)中得到廣泛的應(yīng)用，隨著 計(jì)算機(jī)應(yīng)用于管理領(lǐng)域，地磅也用計(jì)算機(jī)進(jìn)行稱(chēng)重計(jì)量，數(shù)據(jù) 上傳管理網(wǎng)絡(luò)，加強(qiáng)了企業(yè)對(duì)進(jìn) 廠物資的管理。根據(jù)我們公司管 理網(wǎng)絡(luò)的實(shí)際情況，我們的地磅采用了上位PC機(jī)采集稱(chēng)重儀 表數(shù)據(jù)，供管理層查詢(xún)。

地磅上位PC機(jī)軟件 用VB編制，上位PC機(jī)與稱(chēng)重 儀表采用串行口通信。VB提供 了一個(gè)具有串行通信功能的 MSComm控件，使用起來(lái)十分方 便，在窗體的Load事件中設(shè)置 MSComm控件如下：

With MSComm1

.CommPort = 1 .Settings = 1200. E. 7. 2 .HandShaking = comRTS .Rthreshold = 36 .Inputlen = 0 .InputMode = comlnput Mode Text .PortOpen = True End With

用MSComm控件完成通信 后，用VB軟件的ADO數(shù)據(jù)對(duì)象 來(lái)存儲(chǔ)數(shù)據(jù)庫(kù)，ADO是VB的最 新數(shù)據(jù)訪問(wèn)接口，ADO可完全在 程序代碼中運(yùn)行，使程序開(kāi)發(fā)擺 脫數(shù)據(jù)控件的束縛。使用DSN來(lái) 配置數(shù)據(jù)源，在Windows98系統(tǒng) 的控制面板”中的ODBC數(shù)據(jù) 源管理器”來(lái)配置數(shù)據(jù)源，稱(chēng)重?cái)?shù) 據(jù)經(jīng)ODBC存儲(chǔ)在Access數(shù)據(jù) 庫(kù)中。Access數(shù)據(jù)庫(kù)是微軟公司 的辦公自動(dòng)化套裝軟件Office中 的一個(gè)組成部分，Access數(shù)據(jù)庫(kù) 無(wú)論用戶(hù)是創(chuàng)建一個(gè)個(gè)人用的獨(dú) 立桌面數(shù)據(jù)庫(kù)，還是一個(gè)部門(mén)或 整個(gè)公司使用的數(shù)據(jù)庫(kù)，在需要 管理和共享數(shù)據(jù)時(shí)，

Access都能為數(shù)據(jù)庫(kù) 提供有力的支持。

管理層查詢(xún)軟 件的編制。管理層查 詢(xún)軟件也用VB編制，

VB 中的 ADO 或 DAO 對(duì)象都是通過(guò)‘?dāng)?shù)據(jù) 庫(kù)引擎 Database Engine )向數(shù)據(jù)庫(kù)取得 數(shù)據(jù)的。Jet是VB與 Access內(nèi)建的數(shù)據(jù)庫(kù) 引擎。我們?cè)?/span>VB中編 寫(xiě)的程序直接可以使 用Jet存取數(shù)據(jù)。在管 理層軟件中使用SQL 指令來(lái)完成查詢(xún)、合 計(jì)等功能，由于SQL 語(yǔ)言具有功能豐富、

使用方便靈活等特點(diǎn)。各級(jí)管理 部門(mén)的計(jì)算機(jī)對(duì)網(wǎng)絡(luò)服務(wù)器中的汽車(chē)衡數(shù)據(jù)取數(shù)正常。表明 Access數(shù)據(jù)庫(kù)共享數(shù)據(jù)正常。軟 件系統(tǒng)示意圖如下：