用Excel 實現職工信息庫的高效維護

☆ 仲 勇

（海安縣立發中學，江蘇海安 226611）

在許多單位的各類數據管理中經常會用到Access 數據庫，而操作者最熟悉的卻是Excel 程序，如果能將Excel程序作為操作的平臺，而用Access 作為后臺數據庫來存儲和維護數據那就非常方便了。那如何解決兩個應用程序間的接口的問題呢？接下來筆者就給大家介紹最常見的一種方法，即利用ADO 實現對Access 數據庫的操作。

小貼士：ADO 是ActiveX Data Objects 的縮寫，又稱為OLE 自動化接口，是微軟通用的數據庫訪問技術。利用ADO 可 以 訪 問 包 括Access、SQLServer、Oracle 等 多 種類型的數據庫。

在Excel 中使用ADO 前必須要設置ADO 控件的引用。引用的方法是：在Excel VBA 窗口中，單擊“編輯”菜單中的“引用”命令，打開“引用－VBAProject”對話框，選中“可使用的引用” 列表框中的“Microsoft Active Data Objects 2．8 Library”、“Microsoft Active Data Objects Recordset 2．8 Library”、“Microsoft Jet and Replication Object 2．6 Library” 和“Microsoft Date and Time Picker Control 6．0 (SP4)”（測試Office 的版本為2003，如圖1），單擊“確定”按鈕即可。

圖1

假設某單位的職工信息庫為Access 數據庫，文件名為“信息庫．mdb”，庫中有一張名為“工資表”的表，將Excel 工作簿與該MDB 庫文件保存在同一路徑下。

一、設計應用程序界面

首先，在VBA 編輯器中插入一個用戶窗體，利用窗體控件設計（如圖2 所示）的用戶界面。在窗體的“信息錄入或顯示” 區域中放置的是用來顯示數據庫中各個字段內容所對應的控件；下方放置的是對數據庫進行維護的功能按鈕（CommandButton1－CommandButton4），右側放置的用來瀏覽數據的功能按鈕（CommandButton6－CommandButton9）。

圖2

二、編寫事件代碼

（1）首先，對用戶窗體進行初始化，代碼如下：

（2）編寫用于實現數據庫維護的“添加”、“刪除”、“查詢”、“更新”的代碼：

（3）調用“顯示信息”的子程序，用于用戶窗體中記錄的顯示。

（4）分別編寫實現“首字錄”、“下一條”、“上一條”、“最末條”等用來瀏覽數據庫記錄的按鈕代碼：

（5）應用程序窗體關閉時要求確認的代碼：

另外，還要在工作表中添加一個命令按鈕，在按鈕的Click 事件中編寫調用用戶窗體的代碼“UserForm1．Show”，這樣，單擊該按鈕后就可以看到（如圖2 所示）操作界面了。

至此，職工信息管理系統的設計就完成了，限于篇幅，我們就不對各個功能按鈕的調試進行逐一的介紹了，讀者朋友可下載本案例的示例程序自行調試。