VB6 - Xác định vị trí tuyệt đối của chuột.

Tính năng này cho phép bạn biết chính xác vị trí của chuột từ màn hình và không liên quan từ trang tính hoặc điều khiển nó chứa.

Mô-đun

Khai báo hàm

 Loại công khai POINTAPI x Miễn là y Loại dài Loại công khai 

Tạo chức năng

 Sub GetCthon () Dim LonCStat As Long LonCStat = GetC bổngPos & (m_C bổngPos) 'để sử dụng kết quả này, dữ liệu phải được chuyển đổi thành Pixel. m_C bổngPos.x = m_C bổngPos.x * Screen.TwipsPixelX m_C bổngPos.y = m_C bổngPos.y * Screen.TwipsPixelY End Sub