Get the message

[abhid]

hi everybody
i am using following piece of code to catch the messages. Now
MSDN says that you can only use the low word of the message
parameter of the MSG structure. I know this is very much possible
by using LOWORD in windows programming with C, but how can i read the low word of message from VB?

Private Sub getMessage()
Dim MS As MSG
Do While 1
    DoEvents
    PeekMessage MS, Me.hWnd, WM_MOUSEFIRST, WM_MOUSELAST, PM_REMOVE
    Select Case MS.message
        
        'This is where i need help
 
    End Select
Loop
End Sub

Please help me.
Thanks in advance.