Postupy: Volání rozhraní API systému Windows (Visual Basic)

Tento příklad definuje a volá MessageBox funkci v user32.dll a pak jí předá řetězec.

Příklad

' 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

Kompilace kódu

Tento příklad vyžaduje:

• Odkaz na obor názvů System.

Robustní programování

Následující podmínky mohou způsobit výjimku:

• Metoda není statická, je abstraktní nebo byla dříve definována. Nadřazený typ je rozhraní, nebo délka name či dllName je nula. (ArgumentException)

• Název nebo dllName je Nothing. (ArgumentNullException)

• Typ obsahující byl dříve vytvořen pomocí CreateType. (InvalidOperationException)

Viz také

• Bližší pohled na Platform Invoke
• Příklady pro Platform Invoke
• využívání nespravovaných funkcí knihovny DLL
• Definování metody pomocí reflektivní emise
• Návod: Volání rozhraní API systému Windows
• interoperabilita COM