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:
O método não é estático, é abstrato ou foi definido anteriormente. O tipo pai é uma interface ou o tamanho de name ou dllName é zero. (ArgumentException)
O name ou dllName é
Nothing
. (ArgumentNullException)O tipo recipiente foi criado anteriormente usando
CreateType
. (InvalidOperationException)
Confira também
Colaborar conosco no GitHub
A fonte deste conteúdo pode ser encontrada no GitHub, onde você também pode criar e revisar problemas e solicitações de pull. Para obter mais informações, confira o nosso guia para colaboradores.