Vb.net FatalAppExitA只显示a=char

我只是在VB.net上测试

FatalAppExitA

，但出于某种原因，它只显示了一个equals字符。我将在我未来的一些应用程序上使用此功能，但我需要知道这里发生了什么

以下是消息框的屏幕截图：

代码如下：

Private Declare Sub FatalAppExit Lib "kernel32" Alias "FatalAppExitA" (
    ByVal uAction As Long,
    ByVal lpMessageText As String)

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    FatalAppExit(0&, "FatalAppExit Test")
End Sub
Private Declare Sub FatalExit Lib "kernel32" (ByVal code As Long)

---

非常感谢您的帮助。

您标记了您的问题

vb.net

，因此让我们使用vb.net语法进行函数声明

根据定义：

void FatalAppExitW(
  UINT    uAction,
  LPCWSTR lpMessageText
);

这可以声明为：

<DllImport("kernel32.dll", CharSet:=CharSet.Unicode)>
Friend Shared Sub FatalAppExit(uAction As UInteger, lpMessageText As String)
End Sub

您可能还对以下方面感兴趣：

---

只要

是vb6/vba语法，在vb.net中必须将参数

声明为整数

。

FatalAppExit(0, "FatalAppExit Test")