9、VBA编程中的决策、循环与流程控制

VBA编程中的决策、循环与流程控制

1. IIf函数决策机制

IIf函数可用于进行条件判断。第一个IIf函数判断Input1是否等于Input2，如果表达式为真，则返回 “The values are equal.” 到Output；否则，调用第二个IIf函数。第二个IIf函数判断Input1是否大于Input2，若为真，则返回 “First Number is greater.” 给第一个IIf函数，再由其返回给Output；若为假，则返回 “Second Number is greater.”。这种方法代码虽仅一行，但可读性差且难以注释，而使用If…Then…ElseIf语句则需要七行代码。

2. 使用Select Case语句进行选择

当需要进行大量连续决策时，If…Then…Else或If…Then…ElseIf语句会使代码难以阅读。而VBA提供的Select Case语句，在从多个选项中进行单一选择时，是更易读的选择。

2.1 Select Case语句的使用

Select Case结构以Select Case语句开始，以End Case语句结束。需提供一个变量供Select Case语句进行选择，结构内包含Case子句，用于与输入变量的值进行比较。当子句的值与输入变量的值匹配时，执行该子句所需的所有任务。

以下是使用Select Case语句进行多决策的示例代码：

Public Sub MakeChoice()
    Dim CursorPosition  As Integer  ' Current row selectio