Declare Function MonitorFromPoint Lib "user32" ( _
ByVal x As Long, _
ByVal y As Long, _
ByVal dwFlags As Long) As Long
MonitorFromPoint получает дескриптор показывающего монитора, который содержит заданную точку.
Если точка содержится в мониторе, возвращается значение дескриптора HMONITOR показывающего монитора. Если точка не содержится в показывающем мониторе, то возвращаемое значение зависит от значения dwFlags
смотри пример monitor.zip