相当于“Error(Err.Number)”VB6 到 VB.NET 2022

Mat*_*L99 3 vb.net string vb6 vb6-migration

我有一些VB6代码需要迁移到VB.NET,我想询问一下这行代码,看看是否有办法在.NET中实现它

Error(Err.Number)
Run Code Online (Sandbox Code Playgroud)

不断告诉我需要一个表达式。

If Err.Number = 53 Then
        GoTo x
    Else
        Msg = "      Error N. " & Err.Number & Chr(13) & Error(Err.Number)
        MsgBox(Msg, 16, "Warning")
        FileClose(1)
        Exit Sub
    End If
Run Code Online (Sandbox Code Playgroud)

Bri*_*ord 8

VB6 文档指出:

Error 函数的返回值对应于 Err 对象的 Description 属性。

所以不要使用Error(Err.Number)use Err.Description

  • 虽然上述答案在 ofc 技术上是正确的,但您可能会考虑利用 VB.NET 的 Try/Catch/End Try 异常处理,而不是将 VB6 的尴尬错误处理 1:1 移植到 VB.NET。尤其是,如果您考虑继续在 VB.NET 中进一步开发应用程序。 (2认同)