module.bas

用于小灵通CNGP协议下的通讯接口监控

Attribute VB_Name = "Module"
Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Public Const hwnd_topmost = -1
Public Const swp_nomove = &H2
Public Const swp_nosize = &H1
Public Const topmost_flags = swp_nomove Or swp_nosize