本文教你如何使用VBA判斷語(yǔ)句。
1)If…Then…Else語(yǔ)句
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
或者,可以使用塊形式的語(yǔ)法:
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語(yǔ)句
如1:
Select Case Pid
Case “A101”
Price=200
Case “A102”
Price=300
……
Case Else
Price=900
End Case
3)Choose 函數(shù)
choose(index, choce-1,choice-2,…,choice-n),可以用來(lái)選擇自變量串列中的一個(gè)值,并將其返回,index 必要參數(shù),數(shù)值表達(dá)式或字段,它的運(yùn)算結(jié)果是一個(gè)數(shù)值,且界于 1 和可選擇的項(xiàng)目數(shù)之間。choice 必要參數(shù),Variant表達(dá)式,包含可選擇項(xiàng)目的其中之一。如:
GetChoice = Choose(Ind, "Speedy", "United", "Federal")
4)Switch函數(shù)
Switch(expr-1, value-1[, expr-2, value-2 _ [, expr-n,value-n]])
switch函數(shù)和Choose函數(shù)類似,但它是以兩個(gè)一組的方式返回所要的值,在串列中,最先為T(mén)RUE的值會(huì)被返回。 expr 必要參數(shù),要加以計(jì)算的 Variant 表達(dá)式。value 必要參數(shù)。如果相關(guān)的表達(dá)式為 True,則返回此部分的數(shù)值或表達(dá)式,沒(méi)有一個(gè)表達(dá)式為 True,Switch 會(huì)返回一個(gè) Null值。