Udostępnij za pośrednictwem


Porady: wywoływanie Windows API (Visual Basic)

Ten przykład definiuje i wywołuje MessageBox funkcję w user32.dll, a następnie przekazuje do niej ciąg.

Przykład

' 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

Kompilowanie kodu

Ten przykład wymaga:

  • Odwołanie do System przestrzeni nazw.

Niezawodne programowanie

Następujące warunki mogą spowodować wyjątek:

  • Metoda nie jest statyczna, jest abstrakcyjna lub została wcześniej zdefiniowana. Typ nadrzędny jest interfejsem lub długość nazwy lub dllName wynosi zero. (ArgumentException)

  • Nazwa lub dllName to Nothing. (ArgumentNullException)

  • Typ zawierający został wcześniej utworzony przy użyciu polecenia CreateType. (InvalidOperationException)

Zobacz też