vba 选择判断语句

除了If语句，vba还有其他判断语句

（1）Select Case…Case…End Case语句

如1：

Select Case  Pid
   Case  “A101”
   Price=200
   Case  “A102”
   Price=300
   ……
   Case Else
   Price=900
End Select

（2）Choose 函数
​choose(index, choice-1,choice-2,…,choice-n)​

可以用来选择自变量串列中的一个值，并将其返回，index 必要参数，数值表达式或字段，它的运算结果是一个数值，且界于 1 和可选择的项目数之间。choice 必要参数，Variant表达式，包含可选择项目的其中之一。如：​GetChoice = Choose(Ind, "Speedy", "United", "Federal")​

（3）Switch函数
​Switch(expr-1, value-1[, expr-2, value-2 _ [, expr-n,value-n]])​

switch 函数和 Choose 函数类似，但它是以两个一组的方式返回所要的值，在串列中，最先为
TRUE 的值会被返回。 expr 必要参数，要加以计算的 Variant 表达式。value 必要参数。如果相关的表达式为 True，则返回此部分的数值或表达式，没有一个表达式为 True，Switch 会返回一个 Null值。