學(xué)習(xí)VBA基礎(chǔ)知識

1、 vba (visual basic for vba (visual basic for application) application) 是是microsoftmicrosoftofficeoffice系列軟件的內(nèi)置編程語言，其系列軟件的內(nèi)置編程語言，其語法結(jié)構(gòu)與語法結(jié)構(gòu)與visualvisualbasicbasic編程語言互相兼容，采用的是編程語言互相兼容，采用的是面向?qū)ο蟮木幊虣C制面向?qū)ο蟮木幊虣C制和可視化的編程環(huán)境。和可視化的編程環(huán)境。n1.1.集合和對象集合和對象n vbavba中的應(yīng)用程序是由許多對象組中的應(yīng)用程序是由許多對象組成的，如表、窗體、查詢等。對象是成的，如表、窗體、查

2、詢等。對象是幫助構(gòu)造應(yīng)用程序的元素，以特定的幫助構(gòu)造應(yīng)用程序的元素，以特定的方式組織這些對象，就形成了應(yīng)用程方式組織這些對象，就形成了應(yīng)用程序序 。2.對象的屬性、事件和方法 屬性 屬性描述了對象的自身性 質(zhì) 其格式為： 對象名.屬性=屬性值n事件事件n 事件是指可以發(fā)生在一個對象事件是指可以發(fā)生在一個對象上且能夠被該對象所識別的動作。上且能夠被該對象所識別的動作。 n 如：單擊某個命令按鈕就產(chǎn)生如：單擊某個命令按鈕就產(chǎn)生該按鈕的該按鈕的“單擊單擊”事件當(dāng)某個對象發(fā)事件當(dāng)某個對象發(fā)生某一事件后，就會驅(qū)動系統(tǒng)去執(zhí)行生某一事件后，就會驅(qū)動系統(tǒng)去執(zhí)行預(yù)先編好的、與這一事件相對應(yīng)的一預(yù)先編好的、與這一

3、事件相對應(yīng)的一段程序。段程序。 方法 方法是系 統(tǒng)事先設(shè)計好的，可以完成一定操作的特殊過程，是附屬于對象的行為和動作。在需要使用的時候可以直接調(diào)用。其格式為：對象名.方法名對 象 名含 義application代表整個excel應(yīng)用程序window代表窗口worksheet代表一個工作表sheets指定的或活動工作薄中所有工作表的集合shaperange代表形狀區(qū)域，它是文檔中的一組形狀pivottable代表工作表上的 數(shù)據(jù)透視圖workbook代表一個excel工作薄shape代表繪圖層中的對象，例如自選圖形range代表某一單元格、某一行、某一列、某一區(qū)域name代表單元格區(qū)域的自定義名

4、chart代表工作薄中的圖表filedialog提示文件對話框，功能和應(yīng)用程序中標(biāo)準(zhǔn)“打開”和“保存”對話框類似commandbarpopup代表命令欄上的一個彈出式控件commandbar代表容器應(yīng)用程序中的一個命令欄nvba vba 中的程序與函數(shù)共有種：中的程序與函數(shù)共有種：n 一般程序（一般程序（subsub）、事件程序）、事件程序（eventevent）、）、n 屬性程序（屬性程序（propertyproperty）和函數(shù)）和函數(shù)（functionfunction）nvbavba程序窗口共種：程序窗口共種：n 代碼窗口、立即窗口、本地窗口、代碼窗口、立即窗口、本地窗口、n 監(jiān)視窗口、

5、工程資源管理器和屬性監(jiān)視窗口、工程資源管理器和屬性窗口窗口n在在vbevbe環(huán)境中編寫環(huán)境中編寫vbavba代碼代碼工程窗口選擇對象屬性窗口選擇對象的屬性代碼窗口選擇事件microsoftexcel插入模塊運行子過程/用戶窗體設(shè)計模式中斷重新設(shè)計 工程資源管理器 對象瀏覽器屬性窗口 新建一個窗體并添加兩個命令按鈕，運行窗體后，單擊第一個按鈕，顯示一個消息框；單擊第二個按鈕，退出當(dāng)前窗體 通過此例，體會可視化編程、面向?qū)ο蟆⑹录^通過此例，體會可視化編程、面向?qū)ο?、事件過程、應(yīng)用方法等基本概念。程、應(yīng)用方法等基本概念。nvbavba使用常量、變量來存儲值。用來保使用常量、變量來存儲值。用來保存在

6、程序運行存在程序運行期間數(shù)據(jù)。期間數(shù)據(jù)。n常量：在程序運行中其存儲的值不會改常量：在程序運行中其存儲的值不會改變。變。n變量：在程序運行中其值可以改變。變量：在程序運行中其值可以改變。n在程序運行過程中，其值在程序運行過程中，其值不會被改變不會被改變的量稱為常量。在的量稱為常量。在nvbavba中有三類常量：中有三類常量：n1.1.直接常量直接常量n 如：如：1010，20%20%，123.0123.0，“abab”，“vbavba程序設(shè)計程序設(shè)計”等等n2.2.符號常量符號常量n3.3.系統(tǒng)常量系統(tǒng)常量n 指指vbavba系統(tǒng)預(yù)先定義好的，用戶可系統(tǒng)預(yù)先定義好的，用戶可以直接引用的量。以直接

7、引用的量。n 如：如：acformacform，acqueryacquery，vbokvbok，vbred vbred n 在程序中，某個常量多次被使在程序中，某個常量多次被使用，則可以使用一個用，則可以使用一個n符號來代替該常量，這樣不僅在書符號來代替該常量，這樣不僅在書寫上方便，而且有效寫上方便，而且有效n地改進(jìn)了程序的可讀性和可維護(hù)性。地改進(jìn)了程序的可讀性和可維護(hù)性。 n vbavba中使用關(guān)鍵字中使用關(guān)鍵字constconst 聲明聲明符號常量。符號常量。n其格式如下：其格式如下：n const const 常量名常量名 類型符號類型符號=常常數(shù)表達(dá)式數(shù)表達(dá)式n如：如：n const

8、const pipi#= 3.1415926#= 3.1415926n 變量是內(nèi)存中的臨時單元，存放在程變量是內(nèi)存中的臨時單元，存放在程序執(zhí)行序執(zhí)行過程中產(chǎn)過程中產(chǎn)n生的中間結(jié)果和最后輸出結(jié)果。生的中間結(jié)果和最后輸出結(jié)果。n 在程序中使用變量，就要給變量定義在程序中使用變量，就要給變量定義名稱及類型，即名稱及類型，即n對變量進(jìn)行聲明。對變量進(jìn)行聲明。n1.1.變量名必須以變量名必須以字母或漢字字母或漢字開頭，后可開頭，后可跟跟字母、漢字、字母、漢字、 n 數(shù)字或下劃線數(shù)字或下劃線組成（不能含有小數(shù)點組成（不能含有小數(shù)點和空格），長度和空格），長度 n 不超過不超過255255個字符的字符串；個

9、字符的字符串；n2.2.不能使用不能使用vbavba中的中的關(guān)鍵字關(guān)鍵字；n3.vba3.vba中中不區(qū)分不區(qū)分變量名的大小寫；變量名的大小寫；n4.4.變量名的最后一個字符可以是變量名的最后一個字符可以是% %、& &、！、！、# #、$ $等表示等表示n 數(shù)據(jù)類型的聲明符。數(shù)據(jù)類型的聲明符。n說明：常量名的命名規(guī)則與變量名的命說明：常量名的命名規(guī)則與變量名的命名規(guī)則相同名規(guī)則相同n在在vbavba中，數(shù)據(jù)類型用來決定變量可以中，數(shù)據(jù)類型用來決定變量可以保存何種數(shù)據(jù)。保存何種數(shù)據(jù)。nvbavba支持多種數(shù)據(jù)類型，為用戶編程提支持多種數(shù)據(jù)類型，為用戶編程提供了方便。供了方便。n用用dimdim

10、或或staticstatic語句顯式聲明局部變語句顯式聲明局部變量量n 格式：格式：dim dim 變量名變量名 as as 類型類型 n 或或 dim dim 變量名類型符變量名類型符n 語句中的語句中的“as as 類型類型”子句是可子句是可選的。如果使用該子句，就可以定選的。如果使用該子句，就可以定義變量的數(shù)據(jù)類型。未使用，默認(rèn)義變量的數(shù)據(jù)類型。未使用，默認(rèn)變量的類型為變體型（變量的類型為變體型（variantvariant）。）。n例如：例如：dim i as integer, sdim i as integer, sn 表示聲明了一個名為表示聲明了一個名為i i的整型的整型變量和一個

11、名為變量和一個名為s s的變體型變量。的變體型變量。ndim dim 聲明聲明：隨過程的調(diào)用而分配存貯單：隨過程的調(diào)用而分配存貯單元，每次調(diào)用都元，每次調(diào)用都n對變量初始化；過程體結(jié)束，變量的內(nèi)對變量初始化；過程體結(jié)束，變量的內(nèi)容自動消失，存容自動消失，存n儲單元釋放。儲單元釋放。nstatic static 聲明聲明：static static 聲明的變量，也聲明的變量，也稱為靜態(tài)變量。稱為靜態(tài)變量。n靜態(tài)變量在程序運行過程中一直保留其靜態(tài)變量在程序運行過程中一直保留其值，即每次調(diào)用值，即每次調(diào)用n過程，變量保持原來的值。過程，變量保持原來的值。函數(shù)函數(shù)返回類型返回類型cbytebytecb

12、oolbooleancintintegerclnglong(長整型)csngsingle(單精度浮點型)cdbldouble(雙精度浮點型)ccurcurrency(變比整數(shù))cdecdecimalcdatedatecstrstringcvarvariantnsub abc()sub abc()n dim i as integer dim i as integern dim str as string dim str as stringn i = 10 i = 10n msgbox typename(i) msgbox typename(i)n str = cstr(i) str = cstr

13、(i)n msgbox typename(str) msgbox typename(str)nend subend subn 未進(jìn)行上述的聲明而直接使用變量，未進(jìn)行上述的聲明而直接使用變量，稱變量的稱變量的隱式隱式n聲明聲明采用隱式聲明的變量都是變體型采用隱式聲明的變量都是變體型（variantvariant）n注意注意: :n vbavba中允許不事先聲明而直接使用變中允許不事先聲明而直接使用變量，可以通過語量，可以通過語n句句option explicitoption explicit，來要求所使用的，來要求所使用的變量必須事先聲變量必須事先聲n明，否則明，否則vbavba會發(fā)出警告信息。

14、會發(fā)出警告信息。nprivate sub form_click()private sub form_click()n sum = 0 sum = 0n a = 10 a = 10n b = 20 b = 20n sum = a + b sum = a + bn debug.print sum= & debug.print sum= & sumsumnend sub end sub 良好的編程習(xí)慣應(yīng)該是“先聲明變量，后使用變量”，這樣做可以提高程序的效率，同時也使程序易于調(diào)試。vba中可以強制顯式聲明，可以在窗體模塊、標(biāo)準(zhǔn)模塊和類模塊的通用聲明段中加入語句：option explicitn聲明而

15、未賦值的變量的值為：聲明而未賦值的變量的值為：n數(shù)值型變量初始化為數(shù)值型變量初始化為0 0；n字符型變量為零長度字符串；字符型變量為零長度字符串；n變體型變量初始化為變體型變量初始化為 emptyempty；n 連接運算符：連接運算符： 、+ +（字符串連接）（字符串連接）例如：例如：123 + 456 123 + 456 結(jié)果結(jié)果 123456 123456 n 123 & 456 123 & 456 結(jié)果結(jié)果 123456123456n 使用上使用上 與與+ +的區(qū)別：的區(qū)別：n 例如：例如： abcdefabcdef & 12345 & 12345 結(jié)果為結(jié)果為 abcdef12345a

16、bcdef12345n 123 & 456 123 & 456 結(jié)果為結(jié)果為 123456 123456 n abcdefabcdef + 12345 + 12345 結(jié)果為結(jié)果為 出錯出錯n 123 + 456 123 + 456 結(jié)果為結(jié)果為 579579n將兩個操作數(shù)進(jìn)行大小比較，結(jié)果為邏將兩個操作數(shù)進(jìn)行大小比較，結(jié)果為邏輯值。輯值。n注意：注意：字符串比較字符串比較, ,則按字符的則按字符的asciiascii碼碼值從左到右一一值從左到右一一 n 比較，直到出現(xiàn)不同的字符為止。比較，直到出現(xiàn)不同的字符為止。n將操作數(shù)進(jìn)行邏輯運算，結(jié)果是邏輯值將操作數(shù)進(jìn)行邏輯運算，結(jié)果是邏輯值n例例1

17、1：用人單位招聘秘書：年齡小于：用人單位招聘秘書：年齡小于4040歲歲的女性，學(xué)歷?？苹虮究频呐?，學(xué)歷?？苹虮究?正確的vba表達(dá)式： 3=x and x =7 錯誤的vba表達(dá)式： 3=x=7 或 3=x or x=7 年齡40，性別=“女”，(學(xué)歷=“?？啤保瑢W(xué)歷=“本科”) and and or例2：算術(shù)表達(dá)式：73 x作作 用用關(guān)關(guān) 鍵鍵 字字option compare設(shè)置字符串比較規(guī)則strcomp比較兩個字符串strconv字符串類型轉(zhuǎn)換lcase、ucase大小寫變換space、string重復(fù)字符串len計算字符串長度format設(shè)置字符格式lset、rset重排字符串in

18、str、left、ltrim、mid、rightrtrim、trim處理字符串split、join拆分與連接字符串noption compare binary|text|databaseoption compare binary|text|databasenoption compare binary:option compare binary:是根據(jù)字符的內(nèi)部二進(jìn)制表示導(dǎo)出的一種排序是根據(jù)字符的內(nèi)部二進(jìn)制表示導(dǎo)出的一種排序na-za-za-za-z漢字漢字noption compare text:option compare text:是根據(jù)系統(tǒng)區(qū)域確定的一種不區(qū)分大小寫的一種排序是根據(jù)系統(tǒng)區(qū)

19、域確定的一種不區(qū)分大小寫的一種排序n（a=aa=a）(b=b)(z=z)(b=b) 連接運算符連接運算符 關(guān)系關(guān)系運算符運算符 邏輯運算邏輯運算n 函數(shù)實際上是系統(tǒng)事先定義好的內(nèi)部函數(shù)實際上是系統(tǒng)事先定義好的內(nèi)部程序，用來完成程序，用來完成n特定的功能。特定的功能。vbavba提供了大量的內(nèi)部函提供了大量的內(nèi)部函數(shù)，供用戶在編程數(shù)，供用戶在編程n時使用。時使用。n 函數(shù)的調(diào)用形式為：函數(shù)的調(diào)用形式為：n 函數(shù)名函數(shù)名( (參數(shù)表參數(shù)表) )n常用內(nèi)部函數(shù)常用內(nèi)部函數(shù)n常用內(nèi)部函數(shù)，在立即窗口練習(xí)，體會常用內(nèi)部函數(shù)，在立即窗口練習(xí)，體會函數(shù)的功能。函數(shù)的功能。 請請n參照：參照：vbavba函數(shù)

20、參考手冊函數(shù)參考手冊 n 模塊模塊是自定義的過程、函數(shù)保存是自定義的過程、函數(shù)保存的地方，也是錄制的宏保存的場所。有的地方，也是錄制的宏保存的場所。有兩種基本類型的模塊：類模塊和標(biāo)準(zhǔn)模兩種基本類型的模塊：類模塊和標(biāo)準(zhǔn)模塊。模塊可以通過右鍵單擊工程資源管塊。模塊可以通過右鍵單擊工程資源管理器的工程名，選擇理器的工程名，選擇“插入模塊插入模塊”來來新建。新建的模塊缺省的名稱為新建。新建的模塊缺省的名稱為“模塊模塊1 1” ”，“模塊模塊2 2” ”, ,建議在屬性窗口內(nèi)更改建議在屬性窗口內(nèi)更改為有意義的名稱。為有意義的名稱。模塊任務(wù)： （1）保存過程和函數(shù)； （2）定義模塊內(nèi)的私有變量或整個工程的

21、公有變量。n過程是最基本的運行單位過程是最基本的運行單位n語法語法nprivate | public | friend private | public | friend static sub name (arglist) static sub name (arglist) statementsstatementsexit subexit substatementsstatementsnend subend subn在以上程序中，在以上程序中，sub sub 代表過程種類，代表過程種類，表示運行指定的操表示運行指定的操n作，但不返回運行結(jié)果；作，但不返回運行結(jié)果；public可選的。表示所有模

22、塊的所有其它過程都可訪問這個 sub 過程。 如果在包含 option private 的模塊中使用，則這個過程在該工程外是不可使用的。private可選的。表示只有在包含其聲明的模塊中的其它過程可以訪問該 sub 過程。friend可選的。只能在類模塊中使用。表示該 sub 過程在整個工程中都是可見的，但對對象實例的控制者是不可見的。static可選的。表示在調(diào)用之間保留 sub 過程的局部變量的值。static 屬性對在 sub 外聲明的變量不會產(chǎn)生影響，即使過程中也使用了這些變量。name必需的。sub 的名稱；遵循標(biāo)準(zhǔn)的變量命名約定。arglist可選的。代表在調(diào)用時要傳遞給 sub

23、過程的參數(shù)的變量列表。多個變量則用逗號隔開。statements可選的。sub 過程中所執(zhí)行的任何語句組。n函數(shù)是具有返回值的過程函數(shù)是具有返回值的過程n語法語法n public | private | public | private | friend friend static function name static function name (arglist) as type(arglist) as typen statements statementsn name = expression name = expressionn exit function exit function

24、n statements statementsn name = expression name = expressionnend functionend function public可選的。表示所有模塊的所有其它過程都可訪問這個 function 過程。如果是在包含 option private 的模塊中使用，則這個過程在該工程外是不可使用。private可選的。表示只有包含其聲明的模塊的其它過程可以訪問該 function 過程。friend可選的。只能在類模塊中使用。表示該 function 過程在整個工程中都是可見的，但對于對象實例的控制者是不可見的。static可選的。表示在調(diào)用之間

25、將保留 function 過程的局部變量值。static 屬性對在該 function 外聲明的變量不會產(chǎn)生影響，即使過程中也使用了這些變量。name必需的。function 的名稱；遵循標(biāo)準(zhǔn)的變量命名約定。arglist可選的。代表在調(diào)用時要傳遞給 function 過程的參數(shù)變量列表。多個變量應(yīng)用逗號隔開。type可選的。function 過程的返回值的數(shù)據(jù)類型，可以是 byte、 boolean 、integer、long、currency、single、double、decimal（目前尚不支持）、date、string（除定長）、object、variant或任何用戶定義類型。sta

26、tements可選的。在 function 過程中執(zhí)行的任何語句組。expression可選的。function 的返回值。v調(diào)用一個過程（調(diào)用一個過程（subsub）時，必須鍵入過）時，必須鍵入過程名稱以及任何需要的參數(shù)值。程名稱以及任何需要的參數(shù)值。callcall語語句可有可無，如果使用它，則參數(shù)必須句可有可無，如果使用它，則參數(shù)必須以括號括起來。以括號括起來。 v調(diào)用函數(shù)（調(diào)用函數(shù)（functionfunction）時，為了使用函時，為了使用函數(shù)的返回值，必須指定函數(shù)給變量，并數(shù)的返回值，必須指定函數(shù)給變量，并且用且用括號將參數(shù)封閉起來。括號將參數(shù)封閉起來。nvbavba代碼不區(qū)分字母

27、的大小寫代碼不區(qū)分字母的大小寫n 系統(tǒng)保留字自動轉(zhuǎn)換每個單詞的首字系統(tǒng)保留字自動轉(zhuǎn)換每個單詞的首字母大寫；母大寫；n語句書寫自由語句書寫自由n 一行可書寫幾句語句，之間用冒號一行可書寫幾句語句，之間用冒號(:)(:)分隔；分隔；n 一句語句可分若干行書寫，用續(xù)行一句語句可分若干行書寫，用續(xù)行符（符（_ _）將語句分開。）將語句分開。n賦值語句：給變量、常量或?qū)ο蟮膶儋x值語句：給變量、常量或?qū)ο蟮膶傩灾付ㄒ粋€值或表達(dá)式。性指定一個值或表達(dá)式。n格式：格式：變量名表達(dá)式變量名表達(dá)式n作用：將表達(dá)式的值賦值給變量名。作用：將表達(dá)式的值賦值給變量名。 n 一般用于給變量賦值或?qū)丶话阌糜诮o變量賦值或

28、對控件設(shè)定屬性值。設(shè)定屬性值。n例如：例如：s=10 s=10 n text1.text text1.text 歡迎使用歡迎使用vbavban注意：注意：雖然賦值號與關(guān)系運算符等于雖然賦值號與關(guān)系運算符等于號都用號都用“=”=”表示，表示，vbavba會會 n 根據(jù)所處的位置自動判斷是何根據(jù)所處的位置自動判斷是何種意義的符號種意義的符號n聲明語句：命名和定義常量、變量、數(shù)聲明語句：命名和定義常量、變量、數(shù)組以及過程。組以及過程。n注釋語句注釋語句n 在程序中的適當(dāng)位置加上注釋語句在程序中的適當(dāng)位置加上注釋語句有利于程序的維護(hù)和閱讀。有利于程序的維護(hù)和閱讀。n 格式：格式：rem rem 注釋內(nèi)

29、容注釋內(nèi)容n 或用單引號或用單引號 注釋內(nèi)容注釋內(nèi)容語句組2語句組1tf語句組2條件語句組1ft條件語句組tf條件語句組n單行單行 if if 語句語句n格式：格式：if if 表達(dá)式表達(dá)式 then then 語句語句1 else 1 else 語句語句22n功能：功能：if if 測試指定的條件，如果條件測試指定的條件，如果條件表達(dá)式為真表達(dá)式為真n （truetrue），則執(zhí)行），則執(zhí)行then then 后面的語后面的語句句1 1，否則，否則n 執(zhí)行語句執(zhí)行語句2 2（若（若elseelse子句未省子句未省略）。略）。tf語句2條件語句1tf條件語句1private sub p1( )

30、 dim x as integer, y as integer x = inputbox(“請輸入x值”) if x = 0 then y = 2 * x + 1 else y = 1 msgbox y: & yend subn 語句組可以由一條或多條語句組語句組可以由一條或多條語句組成，語句組不能與成，語句組不能與nthenthen書寫在同一行，否則書寫在同一行，否則vbavba認(rèn)為認(rèn)為是一個單行是一個單行ifif語句，會語句，會n導(dǎo)致導(dǎo)致elseelse沒有匹配的沒有匹配的ifif。n 語句語句“end ifend if”是多行是多行ifif語句的語句的結(jié)束標(biāo)志。在多行結(jié)束標(biāo)志。在多行if

31、if語句語句n中，即使省略中，即使省略elseelse子句，也要寫該子句，也要寫該結(jié)束標(biāo)志。省略結(jié)束標(biāo)志。省略elseelsen子句時的多行子句時的多行ifif語句形式為：語句形式為：n if if 表達(dá)式表達(dá)式 then then n 語句組語句組n end ifend ifyxxxx xxxsincos231030 n n n n t x yt z為最 小數(shù)t 使得x yfff x yzx y x 與y交換y z y 與z交換x y x 與y交換 if x= 90 if mark = 90 thenthen print print 優(yōu)優(yōu) elseif mark = 80 elseif ma

32、rk = 80 thenthen print print 良良 elseif mark = 70 elseif mark = 70 thenthen print print 中中 elseif mark = 60 elseif mark = 60 thenthen print print 及格及格 elseelse print print 不及格不及格 end ifend if方法二方法二if mark 60 thenif mark 60 then print print 不及格不及格 elseif mark 70 elseif mark 70 thenthen print print 及格及

33、格 elseif mark 80 elseif mark 80 thenthen print print 中中 elseif mark 90 elseif mark = 60 if mark = 60 thenthen print print 及格及格 elseif mark = 70 elseif mark = 70 thenthen print print 中中 elseif mark = 80 elseif mark = 80 thenthen print print 良良 elseif mark = 90 elseif mark = 90 thenthen print print 優(yōu)優(yōu)

34、 elseelse print print 不及格不及格 end ifend if：與同類型的下面四種形式之一： 表達(dá)式 例： a 一組枚舉表達(dá)式(用逗號分隔) 2,4,6,8 表達(dá)式1 to 表達(dá)式2 60 to 100 is 關(guān)系運算符表達(dá)式 is 60n語句格式語句格式：nselect case select case 變量或表達(dá)式變量或表達(dá)式n case case 表達(dá)式列表表達(dá)式列表1 1n 語句塊語句塊1 1n case case 表達(dá)式列表表達(dá)式列表2 2n 語句塊語句塊2 2nn case else case elsen 語句塊語句塊n+1n+1nend selectend select . n 結(jié)