Share via


Como chamar APIs do Windows (Visual Basic)

Este exemplo define e chama a função MessageBox em user32.dll e, em seguida, passa uma cadeia de caracteres para ela.

Exemplo

' 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

Compilar o código

Este exemplo requer:

  • Uma referência ao namespace System.

Programação robusta

As seguintes condições podem causar uma exceção:

Confira também