新建From1（窗体），新建Command1-2（按钮CommandButton），代码：

Private Sub Command1_Click()
    If a = 1 And b = 1 Then
        Debug.Print "ok"
    End If
End Sub

Private Sub Command2_Click()
    If a = 1 Then
        If b = 1 Then
            Debug.Print "ok"
        End If
    End If
End Sub

效率分析

从执行效率上看，Command2_Click 实际上可能会稍微快一点，原因如下：

短路评估机制：在 VB6 中，And 运算符不支持短路评估。这意味着无论第一个条件 a = 1 是否为假，VB6 都会计算第二个条件 b = 1。

嵌套 If 结构：在 Command2_Click 中，如果第一个条件 a = 1 为假，VB6 会直接跳过内层的 If 语句，不会计算 b = 1。

实际差异

然而，这种差异在现代计算机上几乎可以忽略不计。除非你的代码需要在极有限的资源下运行，或者需要执行数十亿次这样的判断，否则这种微小的效率差异不会对程序性能产生明显影响。

最佳实践

从代码可读性和维护性考虑，第一种写法通常更受欢迎，因为它更加简洁明了。只有在确实需要优化性能并且通过性能测试证明这种写法能带来显著改善时，才应该考虑使用第二种写法。

对于先比较数字再比较字符串，还是先比较字符串再比较数字，哪种更高效？

Private Sub Command1_Click()
    If a = 1 Then
        If b = "1" Then
            Debug.Print "ok"
        End If
    End If
End Sub

Private Sub Command2_Click()
    If a = "1" Then
        If b = 1 Then
            Debug.Print "ok"
        End If
    End If
End Sub

效率分析

在 VB6 中，先比较数字通常会更高效，原因如下：

类型转换开销：当比较一个数字和一个字符串时，VB6 会将字符串转换为数字。这种转换需要额外的处理时间。

数字比较更快：数字比较是 CPU 可以直接执行的简单操作，而字符串比较涉及字符逐个比对，通常更耗时。

短路评估优势：如果第一个条件（数字比较）为假，VB6 会直接跳过第二个条件（字符串比较），避免了不必要的字符串处理。

实际差异

在实际应用中，这种差异通常很小。除非你的代码需要在极有限的资源下运行，或者需要执行数十亿次这样的判断，否则这种微小的效率差异不会对程序性能产生明显影响。

最佳实践

从代码可读性和维护性考虑，通常建议：

先比较数字：因为数字比较通常更快，且符合常见的编程习惯。

保持类型一致性：如果可能，尽量确保变量类型一致，避免不必要的类型转换。

优化条件顺序：将更可能为假的条件放在前面，利用短路评估提高效率。

总之，对于大多数应用程序，先比较数字再比较字符串是更高效的选择。但在实际开发中，应优先考虑代码的可读性和可维护性，只有在性能确实成为瓶颈时才进行针对性优化。