字符串函数可以在Select-Case语句中执行吗？

Question

在VB.NET中，如何实现以下逻辑？

Select Case testString
    Case Contains("ABC") : Debug.Print "ABC"
    Case Contains("XYZ") : Debug.Print "XYZ"
    Case Else : Debug.Print "Other"
End Select

Answer 1

简单地说：

If testString.Contains("ABC") Then
    Debug.Print "ABC"
ElseIf testString.Contains("XYZ") Then
    Debug.Print "XYZ"
Else
    Debug.Print "Other"
End If

您不能在Select Case语句中检查此类函数的结果，因此使用简单的If语句是最佳且更容易的选择。

您可以随时执行以下操作：

Select Case True
    Case testString.Contains("ABC") : Debug.Print("ABC")
    Case testString.Contains("XYZ") : Debug.Print("XYZ")
    Case Else : Debug.Print("Other")
End Select

但它只能在非常具体的情况下起作用，而且根本不是非常明确和必要的。

Answer 2

在VB.NET中，您可以使用此Select

Select Case True
    Case testString.Contains("ABC")
        Debug.Print("ABC")
    Case testString.Contains("XYZ")
        Debug.Print("XYZ")
    Case Else : Debug.Print("Other")
End Select

但是，在这种情况下，我更喜欢使用简单的If子句。

If testString.Contains("ABC") Then
    Debug.Print("ABC")
ElseIf testString.Contains("XYZ") Then
    debug.Print("XYZ")
Else
    Debug.Print("Other")
End If

这将更加清晰，并且与C#兼容。switch仅允许常量表达式。