COMO CONTROLAR O MOUSE
OLA GENTE, ESTOU COM UM PROBLEMA, COLOQUEI ROTINAS NOS EVENTOS MOUSE_UP E MOUSE_DOWN DO MEU FORM,
private sub mouse up
msgbox "mouse pra cima" ' teste
end sub
private sub mouse down
msgbox "mouse pra baixo" 'teste
end sub
so que quando executo o programa, e mexo o mouse para cima e para baixo não acontece nada!!!, o problema será porque estou usando o keypreview do form?
private sub mouse up
msgbox "mouse pra cima" ' teste
end sub
private sub mouse down
msgbox "mouse pra baixo" 'teste
end sub
so que quando executo o programa, e mexo o mouse para cima e para baixo não acontece nada!!!, o problema será porque estou usando o keypreview do form?
Isso não tem nada a ver !
O Mouse Down e Mouse Up é usado quando vc aperta o botão dela
MouseDown: Quando vc aperta o botão na qual vc coocou o codigo pra baixo
MouseUp: Quando vc solta o botão do mouse
Flw
O Mouse Down e Mouse Up é usado quando vc aperta o botão dela
MouseDown: Quando vc aperta o botão na qual vc coocou o codigo pra baixo
MouseUp: Quando vc solta o botão do mouse
Flw
NUNO, cara, vc viajou agora, mas eskenta naum, acontece isso com todo mundo.
Tipo, da uma olhada:
MouseDown --> Quando vc segura o botão do mouse.
MouseUP --> Quando vc solta o botão do mouse.
Mas tipo, vou resolver seu problema sim cara, vou dizer agora como vc deverá escrever corretamente seu programa:
Ta aà rapaz, freskinho pra vc saber como fazer! Da o pontinho aew hein!
Tipo, da uma olhada:
MouseDown --> Quando vc segura o botão do mouse.
MouseUP --> Quando vc solta o botão do mouse.
Mas tipo, vou resolver seu problema sim cara, vou dizer agora como vc deverá escrever corretamente seu programa:
Dim OldMouseY As Single
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If OldMouseY = 0 Then
OldMouseY = Y
ElseIf Y < OldMouseY Then
MsgBox "Moveu o mouse pra cima!"
OldMouseY = Y
ElseIf Y > OldMouseY Then
MsgBox "Moveu o mouse para baixo!"
OldMouseY = Y
End If
End SubTa aà rapaz, freskinho pra vc saber como fazer! Da o pontinho aew hein!
Ah, vou explicar o programa:
Primeiro ele checa se o valor da última posição vertical (Y) do mouse é 0, isso significa que o programa akabou de iniciar, aÃ, ele coloca o valor vertical do mouse na variável, depois, ele verifica se o novo Y é menor que o armazenado antes, quer dizer que moveu o mouse pra cima, e quando verificar se o Y é maior, é pra ver se o mouse moveu pra baixo! Valeu cara!
Primeiro ele checa se o valor da última posição vertical (Y) do mouse é 0, isso significa que o programa akabou de iniciar, aÃ, ele coloca o valor vertical do mouse na variável, depois, ele verifica se o novo Y é menor que o armazenado antes, quer dizer que moveu o mouse pra cima, e quando verificar se o Y é maior, é pra ver se o mouse moveu pra baixo! Valeu cara!
Po galera, naum leva mau, não!!
Estou até com vergonha!! VIAJEI MESMO NA PURA MAIONESE!!!!!!
nunca tive uma explicação sobre o Assunto..
Estou até com vergonha!! VIAJEI MESMO NA PURA MAIONESE!!!!!!
nunca tive uma explicação sobre o Assunto..
Tópico encerrado , respostas não são mais permitidas