如何:调用 Windows API (Visual Basic)

此示例在 user32.dll 中定义并调用 MessageBox 函数,然后将一个字符串传递给它。

示例

此代码示例也可用作 IntelliSense 代码段。 在代码段选择器中,它位于**“Visual Basic 语言”**中。 有关更多信息,请参见如何:插入 IntelliSense 代码段

' Defines the MessageBox function.
Public Class Win32
    Declare Auto Function MessageBox Lib "user32.dll" (
        ByVal hWnd As Integer, ByVal txt As String,
        ByVal caption As String, ByVal Type As Integer
        ) As Integer
End Class

' Calls the MessageBox function.
Public Class DemoMessageBox
    Public Shared Sub Main()
        Win32.MessageBox(0, "Here's a MessageBox", "Platform Invoke Sample", 0)
    End Sub
End Class

编译代码

此示例需要:

  • System 命名空间的引用。

可靠编程

以下情况可能会导致异常:

请参见

任务

演练:调用 Windows API (Visual Basic)

概念

平台调用详解

平台调用示例

使用非托管 DLL 函数

用反射发出定义方法

其他资源

COM 互操作 (Visual Basic)