VB.NET 如何提供最佳性能“选择案例”或 IF... ELSEIF ... ELSE... END IF答案

【问题标题】：VB.NET How give best performance "Select case" or IF... ELSEIF ... ELSE... END IFVB.NET 如何提供最佳性能“选择案例”或 IF... ELSEIF ... ELSE... END IF
【发布时间】：2023-03-10 08:49:02
【问题描述】：

我有一个巨大的数据表，我需要逐行检查一个特定的值。

IF ELSE 或 SELECT CASE 结构中哪种方法的性能更高？（我专注于为我提供最佳性能的方法）

否则（方法 #1）

For Each vRow In vDTtemp.Rows
    If vRow("Item") = "Time" Then
        vRow("Result") = "000"
    ElseIf vRow("Item") = "DateTime" Then
        vRow("Result") = "001"
    ElseIf vRow("Item") = "String" Then
        vRow("Result") = "002"
    Else
        vRow("Result") = "N/A"
    End If
Next

选择案例（方法 #2）

For Each vRow In vDTtemp.Rows
    Select Case vRow("Item")
        Case "Time"
            vRow("Result") = "000"
        Case "DateTime"
            vRow("Result") = "001"
        Case "String"
            vRow("Result") = "002"
        Case Else
            vRow("Result") = "N/A"
    End Select
Next

【问题讨论】：

您从实际测试中得到了什么结果？此外，(1) 通过索引而不是名称来引用列可能会更快，并且 (2) Select Case 在发布版本中会进行优化，而在调试版本中未完成。
AFAIK 是一样的。在这两种情况下，它都会在找到真实条件后中断。但是，当您必须编写许多 If 语句时，Select Case 是一种更好、更简洁的方式。
是的，性能应该差不多，但 Select Case 的可读性更强。
@OwerFlov mmmm，我认为 IF 方法 #1 会消耗更多资源。例如，所有数据都有“字符串”值，那么，循环需要考虑时间和日期时间，会花费更长的时间。在方法＃2中，选择案例直接转到选项。
你可以用秒表自己看（我这里没有很多数据自己测试）如dreamincode.net/forums/topic/…

标签： vb.net performance if-statement switch-statement cycle

【解决方案1】：

在过去的几天里，我花了很多时间来解决同样的问题，并找到了一种比其他方法快得多的方法。我也发现在字符串变量上使用 Select Case 等同于一系列 If/Else If 语句，而且都慢得令人失望。

但是，以下技术效果非常好，并且将时间减少了 50% 以上。代替原来的代码：

For Each vRow In vDTtemp.Rows
    Select Case vRow("Item")
        Case "Time"
            vRow("Result") = "000"
        Case "DateTime"
            vRow("Result") = "001"
        Case "String"
            vRow("Result") = "002"
        Case Else
            vRow("Result") = "N/A"
    End Select
Next

更改它以打开一个简单的布尔值，并使用 String.Equals 方法，如下所示：

For Each vRow In vDTtemp.Rows
    'Read out the row value so we only need to access the datarow once
    rowValue = vRow("Item")
    'Which of these statements is true?
    Select Case True
        Case rowValue.Equals("Time")
            vRow("Result") = "000"
        Case rowValue.Equals("DateTime")
            vRow("Result") = "001"
        Case rowValue.Equals("String")
            vRow("Result") = "002"
        Case Else
            vRow("Result") = "N/A"
    End Select
Next

通过以这种方式接近它，我得到了显着的改进，在一种情况下，我的代码从 100,000 次迭代循环中的 1.3 秒减少到 0.5 秒。如果这是在一个真正经常被称为时间关键的代码部分中，那会产生很大的不同。

然而，正如下面的 cmets 所指出的，这会执行字符串的“序数”比较，如果使用非英语语言环境，这可能不会导致预期的行为（请参阅 cmets 以获取示例）。

亚当。

【讨论】：

亚当，感谢您的回复。我会用这个方法做一些测试。
这以一种危险的方式与原始代码不兼容，您确实需要在回答中警告这一点。加速很容易解释，String.Equals() 使用 StringComparison.Ordinal。比较字符串的最快方法，但在各种语言中语义相当麻烦。德国用户不会理解为什么 ss 与 ß 不匹配。土耳其人 I 臭名昭著。等等。从简单的 Select Case 语句中解决这个问题的正常方法是 Option Compare Binary。
这是真的，也是一个好点。还有其他参数可以传递给 String.Equals 方法，但在我的测试中，它们导致性能下降到与原始 Select Case 语句相同（或更差）的水平。在我的特殊情况下，这无关紧要，因为我可以完全控制这些值，但任何使用其他语言环境的人肯定需要注意这一点。
@Hans Passant：你说的非常好！实施此方法时我会考虑。谢谢！

【解决方案2】：

没有区别，两种代码样式生成完全相同的 IL。通过在已编译的程序集上运行 ildasm.exe 工具可以看到一些内容。

一般来说，VB.NET 编译器确实会努力优化 Select 语句。当它使用简单的值类型作为选择器和平凡的 Case 语句时，这将起作用。生成的代码将使用专用的 IL 指令Opcodes.Switch。它将被编译为使用查找表的机器代码。非常快。

但是，当您使用字符串表达式作为选择器时，这不起作用。为那个创建一个查找表需要相当于一个代表字典。这影响太大了，编译器只能将每个 case 语句转换为等效的 If 语句。但是，您可以通过在代码中创建此 Dictionary 来轻松优化它，因为字典键和值只是简单的字符串，因此很容易做到。你没有足够的箱子，而且琴弦太短，无法让这主要得到回报，尽管值得一试。它当然可以压缩你的代码。

【讨论】：

我没有很多使用字典的经验，但值得搜索更多相关信息。谢谢！

【解决方案3】：

好的...这篇文章很久以前了，但现在我正在搜索相同的问题，我可以为此添加新的优化。现在我选择使用选择案例，以便更具可读性。另一方面，当“Dim”在 for-next 循环中时，性能会下降很多。

     For Each vRow In vDTtemp.Rows
------->  Dim rowItem = vRow("Item")
        If rowItem = "Time" Then
            vRow("Result") = "000"
        ElseIf rowItem = "DateTime" Then
            vRow("Result") = "001"
        ElseIf rowItem = "String" Then
            vRow("Result") = "002"
        Else
            vRow("Result") = "N/A"
        End If
    Next

即使你想使用 if-then 结构，当 dim 处于 oitside 时也会快很多：

------->     Dim rowItem as string
             For Each vRow In vDTtemp.Rows
------->            rowitem= vRow("Item")
                If rowItem = "Time" Then
                    vRow("Result") = "000"
                ElseIf rowItem = "DateTime" Then
                    vRow("Result") = "001"
                ElseIf rowItem = "String" Then
                    vRow("Result") = "002"
                Else
                    vRow("Result") = "N/A"
                End If
            Next

我希望这对更多人有帮助；）

【讨论】：

【解决方案4】：

如果你真的发现这是你的性能瓶颈，你可以尝试修改 If..Then 子句如下，只访问一次索引器：

For Each vRow In vDTtemp.Rows
    Dim rowItem = vRow("Item")
    If rowItem = "Time" Then
        vRow("Result") = "000"
    ElseIf rowItem = "DateTime" Then
        vRow("Result") = "001"
    ElseIf rowItem = "String" Then
        vRow("Result") = "002"
    Else
        vRow("Result") = "N/A"
    End If
Next

话虽如此，我怀疑这些都是过度优化的案例。编译器应该在这里做最好的事情。如果您从一个较长的 Select Case 中检查 IL，您可能会发现它在封面下使用一串 If..then 子句和“goto”来转义其余子句。您最好的选择是获得最可维护的代码，因为您可能获得的性能优势将被您在 if..then 和 select case 之间看到的最小提升所抵消。

【讨论】：

感谢小费！这将帮助我进一步改善循环。