Declare Function GetProp Lib "user32" Alias "GetPropA" (ByVal hWnd As Long, _ ByVal lpString As String) As Long
GetProp получает числовое значение, связанное с заданным свойством окна. Данное свойство задается при помощи функции SetProp
В успешном случае возвращается дескриптор объекта, связанного с свойством окна. В случае ошибки возвращается 0
' Получим свойство, заданное функцией SetProp
MsgBox "Значение свойства:" + Str(GetProp(Me.hwnd, "TestProp"))