Ошибка: user-defined type not defined - VB

Формулировка задачи:

Может кто уже встречался с такой траблой: user-defined type not defined при попытке объявить функцию GetMessage:

Private Declare Function GetMessage Lib 'user32.dll' Alias 'GetMessageA' (ByRef lpMsg As Msg, ByVal hWnd As Long, ByVal wMsgFilterMin As Long, ByVal wMsgFilterMax As Long) As Long

при выполнении возникает ошибка: user-defined type not defined другие функции из тойже серии работают нормально( например SendMessage) что тут можно сделать ?

Решение задачи: «Ошибка: user-defined type not defined»

textual
                            Листинг программы 
                        

                            Private Type POINTAPI
    x As Long
    y As Long
End Type
 
Private Type Msg
    hWnd As Long
    message As Long
    wParam As Long
    lParam As Long
    time As Long
    pt As POINTAPI
End Type
                        