VB.NET Select Case执行所有案例选项?

时间:2012-12-12 15:44:04

标签: vb.net

在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

1 个答案:

答案 0 :(得分: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