本文教你如何使用VBA判斷語句。
1)If…Then…Else語句
If condition Then [statements][Else elsestatements]
如1:If A>B And C<D Then A=B+2 Else A=C+2
如2:If x>250 Then x=x-100
或者,可以使用塊形式的語法:
If condition Then
[statements]
[ElseIf condition-n Then
[elseifstatements] …
[Else
[elsestatements]]
End If
如1:
If Number < 10 Then
Digits = 1
ElseIf Number < 100 Then
Digits = 2
Else
Digits = 3
End If
2)Select Case…Case…End Case語句
如1:
Select Case Pid
Case “A101”
Price=200
Case “A102”
Price=300
……
Case Else
Price=900
End Case
3)Choose 函數
choose(index, choce-1,choice-2,…,choice-n),可以用來選擇自變量串列中的一個值,并將其返回,index 必要參數,數值表達式或字段,它的運算結果是一個數值,且界于 1 和可選擇的項目數之間。choice 必要參數,Variant表達式,包含可選擇項目的其中之一。如:
GetChoice = Choose(Ind, "Speedy", "United", "Federal")
4)Switch函數
Switch(expr-1, value-1[, expr-2, value-2 _ [, expr-n,value-n]])
switch函數和Choose函數類似,但它是以兩個一組的方式返回所要的值,在串列中,最先為TRUE的值會被返回。 expr 必要參數,要加以計算的 Variant 表達式。value 必要參數。如果相關的表達式為 True,則返回此部分的數值或表達式,沒有一個表達式為 True,Switch 會返回一個 Null值。