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

      編輯Tag賺U幣
      教程Tag:暫無Tag,歡迎添加,賺取U幣!

      推薦:在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ù)男彰碗娫捥柎a時,可以使用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é)運算中的“加”、“減”、“乘”、“除”四種運算符號。使

      來源:模板無憂//所屬分類:Access數(shù)據(jù)庫教程/更新時間:2008-08-22
      相關(guān)Access數(shù)據(jù)庫教程