- Код: Выделить всё
Dim pos As POINTAPI
GetCursorPos pos
If pos.x < вот_тут_нужно_узнать_размер_me.left_ в_пикселях Then MsgBox "MOUSE OUT"

Dim pos As POINTAPI
GetCursorPos pos
If pos.x < вот_тут_нужно_узнать_размер_me.left_ в_пикселях Then MsgBox "MOUSE OUT"


alibek писал(а):Me.Left/Screen.TwipsPerPixelX

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 12