Este ejemplo de código también está disponible en el fragmento de código de IntelliSense. En el selector de fragmentos de código, se encuentra en Lenguaje Visual Basic. Para obtener más información, consulte Cómo: Insertar fragmentos de código en el código (Visual Basic).

' 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

Este ejemplo necesita:

• Una referencia al espacio de nombres System.

Las condiciones siguientes pueden provocar una excepción:

• El método no es estático, es abstracto o se ha definido previamente. El tipo principal es una interfaz o la longitud de name o dllName es cero. (ArgumentException)

• name o dllName es Nothing. (ArgumentNullException)

• El tipo contenedor se ha creado previamente mediante CreateType. (InvalidOperationException)