【正文】 一是使用宏對(duì)象來設(shè)置事件屬性，對(duì)此前面已有敘述；二是為某個(gè)事件編寫 VBA代碼過程，完成指定動(dòng)作，這樣的代碼過程稱為事件過程或事件響應(yīng)代碼。 使用格式如下： Do Until 條件式 循環(huán)體 [條件語句序列 Exit Do 結(jié)束條件語句序列 ] Loop 條件表達(dá)式 語句塊 F T 圖 Do Until— Loop循環(huán)語句流程 27 VBA流程控制語句 4． Do—Loop While語句 Do 循環(huán)體 [條件語句序列 Exit Do 結(jié)束條件語句序列 ] Loop While 條件式 循環(huán)流程如圖 。每個(gè)函數(shù)被調(diào)用時(shí)，都會(huì)返回一個(gè)返回值。 常量是在程序中可以直接引用的實(shí)際值，其值在程序運(yùn)行中不變。 3．循環(huán)結(jié)構(gòu)：重復(fù)執(zhí)行某一段程序語句。 30 面向?qū)ο蟪绦蛟O(shè)計(jì)的基本概念 屬性和方法 屬性和方法描述了對(duì)象的性質(zhì)和行為。顯示消息框如圖 。一般情況下，對(duì)象都具有多個(gè)方法。如賦值語句、過程調(diào)用語句等。 長(zhǎng)整數(shù) /自動(dòng)編號(hào) 2147483648～ 2147483647 單精度數(shù) Single ! 單精度數(shù) 負(fù)數(shù) ～ 正數(shù) ～ 雙精度數(shù) Double 雙精度數(shù) 負(fù)數(shù) ～ 324 正數(shù) ～ 貨幣 Currency 貨幣 ～ 字符串 String $ 文本 0字符～ 65500字符 布爾型 Boolean 邏輯值 True或 False 日期型 Date 日期 /時(shí)間 100年 1月 1日～ 9999年 12月 31日 變體類型 Variant 無 任何 January1/10000（ 日期 ） 數(shù)字和雙精度同 ， 文本和字符串同 6 VBA程序設(shè)計(jì)基礎(chǔ) ?變量與常量 變量是指程序運(yùn)行時(shí)值會(huì)發(fā)生變化的數(shù)據(jù)。 Dim MyValue ’ 變量定義 MyValue = 10 Mod 4 ’ 返回 2 MyValue =10 \ 3 ’ 返回 3 14 VBA程序設(shè)計(jì)基礎(chǔ) 2．關(guān)系運(yùn)算符 用來表示兩個(gè)或多個(gè)值或表達(dá)式之間的大小關(guān)系，有相等（ =）、不等（ ）、小于（ ）、大于（ ）、小于相等（ =）和大于相等（ =）等 6個(gè)運(yùn)算符。 28 VBA流程控制語句 語句塊 條件表達(dá)式 T F 語句塊 條件表達(dá)式 F T 圖 Do— Loop While循環(huán)語句流程圖 圖 Do— Loop Until循環(huán)語句流程圖 29 面向?qū)ο蟪绦蛟O(shè)計(jì)的基本概念 集合和對(duì)象 一個(gè)對(duì)象就是一個(gè)實(shí)體，如一輛自行車或一個(gè)人等。 ―學(xué)生信息登錄” , acDialog 注意，參數(shù)可以省略，取缺省值，但分隔符” ,‖不能省略。 31 面向?qū)ο蟪绦蛟O(shè)計(jì)的基本概念 事件和事件過程 事件是 Access窗體或報(bào)表及其上的控件等對(duì)象可以“辨識(shí)”的動(dòng)作，如單擊鼠標(biāo)、窗體或報(bào)表打開等。該結(jié)構(gòu)是條件式值為假時(shí)，重復(fù)執(zhí)行循環(huán)，直至條件式值為真，結(jié)束循環(huán)。數(shù)組變量由變量名和數(shù)組下標(biāo)構(gòu)成，通常用 Dim語句來定義數(shù)組，定義格式為：