基于VBA的礦山設備管理信息系統開發及應用

韓 艷

（蘭州石化職業技術學院，信息處理與控制工程學院，甘肅 蘭州 730000）

礦山機械設備是指專業從事采礦、選礦、探礦的機械，因此按照功能可以將礦山開采設備進行分類，其中包括采礦設備、選礦設備、探礦設備、排水設備等，具體有起重機、輸送機、通風機、采煤機、刨煤機等[1]。為了能夠更好的管理礦山設備，使得中國的礦產工作可以順利高校的進行，需要借助一定的信息技術手段。經過長時間的研究發現，使用VBA開發語言來開發礦山設備管理信息系統可以達到設備的管理要求。

1 礦山設備管理信息系統開發

該礦山設備管理信息系統采用Excel VBA和SQL Server 2000作為開發環境，VBA環境具有功能強大、運行速度快、使用方便以及開發效率高等特點，SQL Server 2000是Microsoft公司開發的企業級數據庫軟件，具有高效、安全等優點。在此環境下從硬件和軟件兩個角度對該信息系統進行具體開發。

1.1 硬件開發

為了支持設備信息系統管理功能的實現，需要建立起開發環境平臺。首先按照VBA的配置要求，進行硬件搭建。VBA是一種應用程序編程語言，主要用來擴展Windows的應用程序功能，所需要的硬件設備包括：主機服務器、存儲器、運算器等[2]。在此系統當中選擇使用32GB大小的硬盤作為主要存儲設備。選用清晰度較高的硬件掃描設備EPM7128SQC160-10，此設備當中含有128個觸發器和2500個可編程門，輸出可以配置成為3.3V/5V的邏輯電平，將采集到的數據輸出到主機服務器當中，降低數據傳輸過程中產生的延時。

1.2 軟件開發

在VBA環境下礦山設備管理信息系統開發的總體任務是實現礦山對設備、材料管理的規范化、信息化、系統化，因此系統軟件的設計開發結構如圖1所示。

圖1 礦山設備管理信息系統結構圖

從圖中可以看出整個系統結構分為三個部分：用戶界面層、業務邏輯層和數據服務層。其中用戶界面層就是客戶端，該模塊當中以可視化的形式將礦山設備管理的交互界面呈現出來，用戶可以按照需求向系統提交查詢、修改、刪除等操作請求，同時需要上報數據時也通過客戶端進行提交[3]。業務邏輯層提供了事務管理以及權限控制等邏輯操作，按照信息管理系統的需求，可以劃分成為多個功能模塊。數據服務層也就是整個系統的數據庫，用來存儲系統產生的交易明細，以及相關的所有數據資料，在系統當中主要作為后臺支持。

1.2.1 數據庫設計

此礦山設備管理信息系統需要使用數據庫來存儲相關的設備數據信息，因此需要對系統數據庫進行設計，搭建數據庫框架。數據庫的部分VBA語言代碼如下：

Public Function

connectstring()As String=”filedsn=Mining equipment.dsn"

executesql(ByVal sql As String,msgstringAs String)As ADODB.Recordset

Dim cnn As ADODB.Connection

Dim rst As ADODB.Recordset

Dim stokens()As String

On Error GoTo executesql_error

stokens=Split(sql)

Set cnn=New ADODB.Connection

cnn.Open connectstring

1.2.2 設備管理信息系統功能設計

礦山設備管理信息系統的功能模塊由設備基本信息管理模塊、設備庫存管理模塊、設備報表管理模塊以及系統維護模塊四部分組成。

（1）礦山設備基本信息管理模塊。礦山設備的基本信息主要是對設備名稱、形狀的管理，硬件掃描設備把礦山設備的信息輸入到系統當中作為原始數據，當設備的基本信息發生改變時，用戶進入系統當中進行更新處理。

（2）設備庫存管理模塊。此模塊當中主要管理礦山設備的數量，在每一次礦山開采之前都需要整合現有的設備數量，與所需的設備清單作比對，當庫存當中的設備數量不滿足所需數量時，需要進行采買。每一次設備出庫和入庫都需要負責人員進行質量檢驗，確保系統當中的每一個礦山設備都是可以直接使用的。

（3）系統維護模塊。系統維護模塊用來保證管理信息系統的正常運作和使用安全，此模塊對用戶的用戶名和密碼進行管理，用VBA制作用戶登錄界面，開發功能強大的自動化登錄程序程序。每一個提出查詢請求的人員都需要使用相對應的用戶名和密碼才能進入系統當中，在進行其他操作。

2 應用實驗

為了檢驗礦山設備管理信息系統的應用性能，進行系統測試實驗，在保證該系統當中各個功能都可以順利運行的前提下，針對系統管理信息的響應時間進行分析。為了突出該系統的性能，選擇傳統的設備管理信息系統作為實驗對比，按照硬件開發的要求搭建好VBA平臺，向系統當中輸入管理要求，分別記錄兩個系統的響應時間，實驗結果如表1所示。

表1 實驗結果數據表

從表中的數據可以看出，傳統管理信息系統處理任務的平均響應時間為0.18s/個，而VBA平臺下的管理信息系統的平均響應時間為0.069s/個，因此可以看出開發出的礦山設備管理信息系統的響應時間更短，管理速度更快。

3 結語

礦山設備管理信息系統根據礦山開發的實際需求和需要進行設計和開發，切合實際。使用VBA作為開發工具，不但提高了開發效率，而且為軟件的維護、升級帶來方便。該礦山設備管理信息系統為將來建立礦山的信息決策支持系統和計算機集成制造系統奠定了基礎。