我剛學vb,老師們幫我看看這個:
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Type POINTAPI
x As Long
y As Long
End Type
Private Sub Timer1_Timer()
Dim lpPonit As POINTAPI
GetCursorPos lpPonit
print lpPoint.x
End Sub
運行后說缺少物件,實時錯誤424?點擊除錯后停在print lpPoint.x處,什么原因啊?謝謝!!
uj5u.com熱心網友回復:
不好意思,解決了。uj5u.com熱心網友回復:
分給我吧
uj5u.com熱心網友回復:
uj5u.com熱心網友回復:
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/62421.html
標籤:API
