logo elektroda
logo elektroda
X
logo elektroda
REKLAMA
REKLAMA
Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

Jak zrobić żeby klikało nam lewy lub prawy przycisk myszki w visual basic?

TheColorPL 13 Sty 2019 20:52 783 2
REKLAMA
  • #1 17698831
    TheColorPL
    Poziom 5  
    Posty: 22
    Ocena: 4
    Witam, mam problem chciałbym zrobić auto clickera w visual basic, ale nie wiem co wpisać tu:
    sendkeys.send("{?}") mam wpisać LPM czy jak?
  • REKLAMA
  • #2 17698862
    dt1
    Admin grupy komputery
    Posty: 47979
    Pomógł: 7264
    Ocena: 8191
    Witaj.
    Z dokumentacji tej funkcji, którą na pewno chce Kolega przeczytać, ale jeszcze nie zdążył, wynika, że funkcja ta służy do symulacji naciśnięć klawiszy klawiatury. W przypadku myszy zainteresowałbym się na miejscu Kolegi funkcją mouse_event z biblioteki user32 - i również zaczął od przeczytania jej dokumentacji.
  • #3 17710160
    kinggustav
    Poziom 27  
    Posty: 796
    Pomógł: 93
    Ocena: 93
    Popatrz na to - w nagłówku modułu:
    Private Declare Sub mouse_event Lib "user32" _
    (ByVal dwFlags As Long, _
    ByVal dx As Long, _
    ByVal dy As Long, _
    ByVal cButtons As Long, _
    ByVal dwExtraInfo As Long)
    Private Declare Function SetCursorPos Lib "user32" _
    (ByVal X As Long, _
    ByVal Y As Long) As Long
    i wtedy gdzieś dalej:
    Private Sub Klik(X As Long, Y As Long, Btn As Integer) ' Kliknij: 1 - lewym; 2 - środkowym; 3 - prawym
    Dim Fl As Variant: Fl = Array(&H6, &H60, &H18)
    SetCursorPos X, Y
    mouse_event Fl(Btn - 1), 0, 0, 3, 3
    End Sub
REKLAMA