Ошибка: 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