如何：调用 Windows API (Visual Basic)
此示例定义和调用 user32.dll 中的函数 MessageBox 然后将一个字符串传递给它。
示例
' 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 命名空间的引用。
可靠编程
以下情况可能会导致异常:
该方法不是静态的，是抽象的或者以前已定义。 父类型为接口，或者 名称 或 dllName 的长度为零。 (ArgumentException)
名称 或 dllName 是 Nothing。 (ArgumentNullException)
使用 CreateType，包含的类型以前创建的。 (InvalidOperationException)
请参见
任务
演练：调用 Windows API (Visual Basic)