Практическое руководство. Вызов API Windows (Visual Basic)

В этом примере функция MessageBox определяется и вызывается внутри секции user32.dll, после чего ей передается строка.

Пример

' 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

Компиляция кода

Для этого примера требуется:

• Ссылка на пространство имен System.

Надежное программирование

Следующие условия могут вызвать исключение:

• Метод не является статическим, абстрактным или ранее определен. Родительский тип — это интерфейс, длина имени или dllName равна нулю. (ArgumentException)

• Имя или dllNameNothing. (ArgumentNullException)

• Содержащий тип был ранее создан с помощью CreateType. (InvalidOperationException)

См. также

• Более подробный взгляд на вызов платформы
• Примеры вызова платформы
• Использование Неуправляемых Функций DLL
• Определение метода с эмитированием отражения
• Пошаговое руководство. Вызов API Windows
• Взаимодействие COM