1

在 Select Case 语句中,是否有一种简单的方法可以告诉它对于 Case Else,我希望它执行所有其他 Case 选项中指定的所有操作?我知道我可以只复制相关代码,但我正在寻找更简单、更清洁的解决方案。

SELECT CASE answer
   CASE "1"
    *Do something*

   CASE "2"
    *Do something else*

   Case "3"
    *Do all actions in CASE 1 and in Case 2*
END SELECT
4

1 回答 1

3
PRIVATE SUB YourMethod()
   SELECT CASE answer
       CASE "1"
           Method1()

       CASE "2"
           Method2()

       Case "3"
           Method1()
           Method2()
    END SELECT
END SUB

PRIVATE SUB Method1()
   *Do something*
END SUB

PRIVATE SUB Method2()
   *Do something else*
END SUB
于 2012-12-12T15:50:24.020 回答