Access數據庫開發技巧(二)

   模塊的使用技巧


　　Access最重要的特征就是一般不必去寫程序然而可能因為要執行復雜或專業的操作而必須在模塊中用Visual Basic編寫程序然后通過窗體中的命令按鈕來執行相應的程序完成相應的任務比如排名次分段統計等在編寫Visual Basic程序時要注意以下一些問題和技巧
　　變量的運用
　　①對象變量的運用
　　在Access中運用Visual Basic編寫程序需要運用其數據訪問對象它包括數據庫引擎（DBEngine）工作空間（Workspace）數據庫以及數據庫對象中的表查詢記錄集等對象如缺省工作空間DBEngineWorkspaces()當前數據庫DBEngineWorkspaces()Databases()我們可以用一個對象變量來表示一個對象這樣將為編程帶來很大方便為對象變量賦值要用Set語句而不要直接賦值例如
　　Dim thedb As Database
　　Set thedb = DBEngineWorkspaces()Databases()
　　②Variant 數據類型的運用
　　Variant 數據類型是所有沒被顯示聲明（如 DimPrivatePublic 或 Static等語句）為其他類型變量的數據類型Variant 是一種特殊的數據類型除了定長 String 數據及用戶定義類型外可以包含任何種類的數據Variant 也可以包含 EmptyErrorNothing 及 Null特殊值Empty 值用來標記尚未初始化（給定初始值）的 Variant 變量內含 Empty 的 Variant 在數值的上下文中表示 如果是用在字符串的上下文中則表示零長度的字符串 ("")Null 表示未知數據或丟失的數據即無效數據不應將 Empty 與 Null 弄混Null 是表示 Variant 變量確實含有一個無效數據
　　當有些量可能出現Null值時可將該變量定義為Variant 數據類型Variant 數據類型為編程者提供很大的靈活性但犧牲了代碼的速度和長度
　　③通過變量來間接引用數據庫對象及限定條件
　　為了增加靈活性提高控制能力減少代碼的重復和運用循環語句在程序中應充分運用變量來間接引用數據庫對象和限定條件比如各個年級學生成績排名次的處理程序只是各年級的成績表名不同我們可以將程序中的成績表名用一個變量如bzcjb來表示具體處理時再替換為具體的表名如替換為高一年級的成績表名gcjb
　　在具體運用中有一些問題要注意如
Dim thedb As Database
Set thedb = DBEngineWorkspaces()Databases()
Dim thecsb As Recordset
Set thecsb = thedbOpenRecordset(bzcjb DB_OPEN_DYNASET)
這里bzcjb可代表任意一個成績表若bzcjb本身就是一個已存在的數表名則上述最后一個語句中的bzcjb應加上引號如下所示
Set thecsb = thedbOpenRecordset("bzcjb" DB_OPEN_DYNASET)
再比如Dcount 函數可用于確定特定記錄集中的記錄數可以在 Visual Basic宏查詢表達式或計算控件中使用 DCount 函數
語法是DCount(expr domain[ criteria])
其參數如下
expr 表達式用于標識將統計其記錄數的字段可以是一個標識表或查詢中字段的字符串表達式 Expr可為字段的名稱或＊除非是＊ Dcount 函數對包含空字段的記錄不記數若為＊Dcount 函數計算記錄總數domain字符串表達式代表組成域的記錄集可以是表的名稱或查詢的名稱criteria 可選的字符串表達式用于限制 DCount 函數執行的數據范圍對于其限制條件criteria 可用一個變量來代替比如要統計表gcjb中字段語文分數大于等于分的人數可用下式來完成
DCount("＊" "gcjb" " [班級]>=")
假若用數字型變量n來替換則如下
DCount("＊" "gcjb" " [班級]>=" ＆ n)
假若用字符型變量n來替換則如下
DCount("＊" "gcjb" " [班級]>=&#;" ＆ n ＆ "&#;")
要注意替代的形式是不同的上面的符號＆是連接運算符
如何產生程序運行進度框

若在程序運行時能產生一個程序運行進度框將會增加不少樂趣Access可以實現這一要求本人在實踐中摸索出一種簡單的方法就是通過在窗體中建兩個文本框一個大一點的長條形文本框（填充色為白色）作為外框一個窄一點的長條形文本框（填充色為其他彩色長度取為厘米）作為產生程序運行流水線用它們的初始狀態均為不可見然后在程序中控制其屬性為可見的且修改進度流水線文本框的寬度來顯示程序的進展情況要注意的是為了讓進度框在程序運行時能及時顯示出來必須用SetFocus 方法將焦點移動到進度框上并且要調整好流水線文本框與外框文本框的初始位置注意在用Width 屬性改變控件寬度時其單位為TwipTwip=/英寸約為/厘米    

生活不易，碼農辛苦
如果您覺得本網站對您的學習有所幫助,可以手機掃描二維碼進行捐贈