Útmutató: Windows API-k meghívása (Visual Basic)

Ez a példa definiálja és meghívja a MessageBox függvényt a user32.dll-ban, majd egy karakterláncot ad át neki.

példa

' 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

A kód összeállítása

Ehhez a példához a következőre van szükség:

  • Hivatkozás a System névtérre.

Robusztus programozás

A következő feltételek kivételt okozhatnak:

  • A metódus nem statikus, absztrakciós vagy korábban definiált. A szülőtípus egy interfész, vagy a név vagy dllName hossza nulla. (ArgumentException)

  • A név vagy dllName a következő Nothing: . (ArgumentNullException)

  • A tartalmú típus korábban a következővel CreateTypelett létrehozva: . (InvalidOperationException)

Lásd még