【正文】
型: 一是聲明語句,用于給變量、常量或過程定義命名;二是執(zhí)行語句,用于執(zhí)行賦值操作、調(diào)用過程、實(shí)現(xiàn)各種流程控制。 注意:“ =‖是賦值號,不是等號 19 VBA流程控制語句 條件語句 1. If—Then語句(單分支結(jié)構(gòu)) 語句結(jié)構(gòu)為: If 條件表達(dá)式 1 Then 條件表達(dá)式 1為真時要執(zhí)行的語句 或 If 條件表達(dá)式 1 Then 條件表達(dá)式 1為真時要執(zhí)行的語句序列 End If T F F T 條件表達(dá)式 語句塊 圖 單分支結(jié)構(gòu)流程圖 圖 雙分支結(jié)構(gòu)流程圖 條件表達(dá)式 語句塊 1 語句塊 2 20 VBA流程控制語句 2. If…Then…Else 語句(雙分支結(jié)構(gòu)) 語句結(jié)構(gòu)為: If 條件表達(dá)式 1 Then 條件表達(dá)式 1為真時要執(zhí)行的語句 Else 條件表達(dá)式 1為假時要執(zhí)行的語句 或 If 條件表達(dá)式 1 Then 條件表達(dá)式 1為真時要執(zhí)行的語句序列 Else 條件表達(dá)式 1為假時要執(zhí)行的語句序列 End If 21 VBA流程控制語句 3. If—Then—ElseIf語句(多分支結(jié)構(gòu)) 語句結(jié)構(gòu)為(圖 ): If 條件表達(dá)式 1 Then 條件表達(dá)式 1為真時要執(zhí)行的語句序列 1 ElseIf 條件表達(dá)式 2 Then 如果條件表達(dá)式 1為假,并且條件表達(dá)式 2為真時要執(zhí)行的語句系列 2 …… [else 語句序列 n ] End If T T T F F 條件表達(dá)式 1 語句塊 1 條件表達(dá)式 2 語句塊 2 語句塊 n F 條件表達(dá)式 n 語句塊 n+1 圖 多分支結(jié)構(gòu)流程圖 22 VBA流程控制語句 4. Select Case—End Select語句 使用格式如下: Select Case 表達(dá)式 Case 表達(dá)式 1 表達(dá)式的值與表達(dá)式 1的值相等時執(zhí)行的語句序列 [Case 表達(dá)式 2 To 表達(dá)式 3] [表達(dá)式的值介于表達(dá)式 2的值和表達(dá)式 3的值之間時執(zhí)行的語句序列 ] [Case Is 關(guān)系運(yùn)算符 表達(dá)式 4] [表達(dá)式的值與表達(dá)式 4的值之間滿足關(guān)系運(yùn)算為真時執(zhí)行的語句序列 ] [Case Else] [上面的情況均不符合時執(zhí)行的語句序列 ] End Select 23 VBA流程控制語句 F T 表達(dá)式1 語句塊 F T 表達(dá)式2 語句塊 F T 表達(dá)式n 語句塊 語句塊 圖 Select Case… End Select語句結(jié)構(gòu)流程圖 24 VBA流程控制語句 循環(huán)語句 1. For—Next語句 For—Next語句能夠重復(fù)執(zhí)行程序代碼區(qū)域特定次數(shù),使用格式如下: For 循環(huán)變量 =初值 To 終值 [Step 步長 ] 循環(huán)體 [條件語句序列 Exit For 結(jié)束條件語句序列 ] Next [循環(huán)變量 ] 循環(huán)變量 =初值 循環(huán)