在Access中使用系統(tǒng)表保存應(yīng)用程序變量_Access數(shù)據(jù)庫教程

推薦：在VB中用代碼打印ACCESS報表
以下為引用的內(nèi)容： Dim objACC As Object Set objACC = CreateObject("ACCESS.Application") objACC.OpenCurrentDatabase

在開發(fā)ACCESS應(yīng)用程序時，一般需要在窗體和模塊中引用許多變量。為管理這些變量，當然可以在啟動窗體中使用Microsoft Visual Basic for Application（VBA）來設(shè)置它們的值，然后再調(diào)用某個模塊，由該模塊初始化這些值。

然而，在完成應(yīng)用程序開發(fā)之后，使用這個方法的問題出現(xiàn)了：其他人可能需要在將來某個時候改變那些值，卻不知道從何處開始。我建議在數(shù)據(jù)庫中建立一個名為SystemTbl的表，然后用戶可以訪問這個表，并在恰當?shù)臅r候修改數(shù)據(jù)。

建立表和窗體

將表創(chuàng)建好并將變量添加到表中的新記錄之后，可以為用戶創(chuàng)建一個只允許修改而不能添加或刪除記錄的窗體，表中應(yīng)該只包含一條記錄保存有關(guān)使用方法的信息。一旦保存完所有變量，可以在應(yīng)用程序需要的時候使用VBA來檢索那些變量值。

例如，假設(shè)應(yīng)用程序需要保存應(yīng)用程序管理員的姓名和電話號碼，正如你剛才所了解到的，這條信息要求容易修改，如果把它編寫到窗體或模塊的代碼中沒有什么意義。

該表預(yù)定義了一條記錄和兩個字段（到目前為止）：

● 表：SystemTbl

● 字段1：AdminName

● 字段2：AdminPhone

當需要在窗體上向用戶顯示恰當?shù)男彰�和電話號碼時，可以使用OnOpen或OnLoad事件填充窗體上的相應(yīng)標簽，在本例中，我們把標簽命名為“PhoneLabel”和“NameLabel”。清單1.10 .A顯示了這個示例函數(shù)的代碼。

在該示例函數(shù)中，我們以SnapShot-ForwardOnly方式打開記錄集，以減少訪問記錄集時占用的資源；然后，我們將表中字段的值應(yīng)用到Name和Phone標簽的標題上。

最后，關(guān)閉記錄集。永遠記住要關(guān)閉記錄集，它會累積為不需要的資源，導(dǎo)致性能降低甚至更糟糕的問題。由于系統(tǒng)表中只有一條記錄，檢索過程極快。現(xiàn)在，你已經(jīng)給一個有效的數(shù)據(jù)庫應(yīng)用程序添加了可擴展的解決辦法。

分享：ACCESS表達式生成器
“ ”、“-”、“*”、“/”這幾個符號就代表數(shù)學(xué)運算中的“加”、“減”、“乘”、“除”四種運算符號。使