۰۱-آذر-۱۳۸۶, ۱۲:۳۷:۲۳
رای این روشی که گفتم باید یه timer با intevral 1 درست کنید و بعد از این کار کدهای زیر را به timer اضافه کنید.
SetCursorPos 0, 0
حالا یه ماژول درست کنید و این کدها را درونش کپی کنید:
Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
حالا برنامه آمادس.البته به جای 0, 0 می تونید مکان دلخواهی که می خواین موس بره اونجا رو بنویسید.
SetCursorPos 0, 0
حالا یه ماژول درست کنید و این کدها را درونش کپی کنید:
Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
حالا برنامه آمادس.البته به جای 0, 0 می تونید مکان دلخواهی که می خواین موس بره اونجا رو بنویسید.