面向?qū)ο蟪绦蛟O(shè)計(jì)語(yǔ)言-vba-資料下載頁(yè)
2025-01-07 01:59本頁(yè)面
【正文】 self條件 2[=True] Then … 條件 1不成立但條件 2成立時(shí)，執(zhí)行的語(yǔ)句 End if 下面的 IF語(yǔ)句用來(lái)判斷一個(gè)字符是否是字母，而且判斷它的大小寫(xiě)。 If Asc(strChar)63 And Asc(strChar91) Then strCharType=“大寫(xiě)字母子” Elself Asc(strChar)96 And Asc(strChar123) Then strCharType=“小寫(xiě)字母” End If 當(dāng)有多種選擇時(shí)，使用 If …Else 語(yǔ)句，這樣的語(yǔ)句需要多重嵌套，使得程序十分復(fù)雜，不容易讀，這時(shí)就可以使用 Select語(yǔ)句， Select語(yǔ)句是一個(gè)多分支控制語(yǔ)句。語(yǔ)法格式為： Select Case表達(dá)式 Case值 1 語(yǔ)句 1 Case值 2 語(yǔ)句 2 … Case Else 語(yǔ)句 End select 例如：下面語(yǔ)句用來(lái)對(duì)字母進(jìn)行判斷 Select Case strChar Case “A”To “Z” strCharType=“大寫(xiě)字母” Case “a”To “z” strCharType=“小寫(xiě)字母” Case “0”To “9” strCharType=“數(shù)字字母” Case “!”,”?”,”.”,”,””。” strCharType=“標(biāo)點(diǎn)符號(hào)” Case “ ” strCharType=“空格” Case 32 strCharType=“特殊字母” Case Else strCharType=“其它字母” End Select ? 循環(huán)語(yǔ)句： For …Next Do …Loop While …Wend For語(yǔ)句是最常用的循環(huán)控制語(yǔ)句。語(yǔ)法格式為： For 變量 =開(kāi)始值 To 結(jié)束值 Step 步長(zhǎng) 循環(huán)執(zhí)行語(yǔ)句 Next 變量 注意： 當(dāng) STEP不寫(xiě)時(shí)，默認(rèn)的步長(zhǎng)是 1。 Do語(yǔ)句是另外一種循環(huán)語(yǔ)句，有兩種格式： Do While…Loop 和 Do Until…Loop. 1. Do while 條件 [= True] 循環(huán)語(yǔ)句，含有“條件”的變更語(yǔ)句 Loop 2. Do Until 條件 True(或 Not 條件） 循環(huán)語(yǔ)句 Loop 處理執(zhí)行時(shí)的錯(cuò)誤 無(wú)論怎樣為程序作徹底地測(cè)試與排錯(cuò) ， 執(zhí)行的錯(cuò)誤仍可能出現(xiàn) 。 可以使用 On Error Goto指令來(lái)控制當(dāng)有執(zhí)行地錯(cuò)誤發(fā)生時(shí) ， 程序作何反應(yīng) 。 On Error Goto指令的一般語(yǔ)法如下： On Error Goto LabelName ?轉(zhuǎn)移到 LabelName標(biāo)號(hào)的程序代碼的部分 On Error Resume Next ?不考慮錯(cuò)誤 ， 繼續(xù)處理接下來(lái)的指令 On Error Goto 0 ?關(guān)閉錯(cuò)誤陷阱 ， 則在錯(cuò)誤運(yùn)行后會(huì)出現(xiàn)一個(gè)對(duì)話框 ， 顯示出相應(yīng)的出錯(cuò)信息 。 探索模塊窗體 在模塊窗體中 ， 可以書(shū)寫(xiě) VBA函數(shù)和過(guò)程 。 在數(shù)據(jù)庫(kù)窗體中單擊 “ 模塊 ” 按鈕 ， 然后單擊數(shù)據(jù)庫(kù)窗體頂端的 “ 新建 ” 按鈕；或者選中要顯示的模塊名 ，然后單擊 “ 設(shè)計(jì) ” 按鈕就顯示一個(gè) “ 模塊 ” 窗體 。 上圖中的模塊窗體展示了模塊窗體與一個(gè)文檔編輯器相結(jié)合來(lái)編輯 VBA代碼的窗體 。 小結(jié) 在 Access數(shù)據(jù)庫(kù)中 ， 模塊是將 VBA聲明和過(guò)程作為一個(gè)單元來(lái)保存的集合 ， 其中的每一個(gè)過(guò)程可以是一個(gè)函數(shù)過(guò)程或子過(guò)程 。
高考資料相關(guān)推薦
鄂ICP備17016276號(hào)-1