Sdílet prostřednictvím


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 System obor názvů.

Robustní programování

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

Viz také