Alguém Sabe como simular o clique esquerdo do mouse? (como se fosse sendkeys)
Não encontro isso em nenhum lugar.

Obrigado.

cara ve se isso te ajuda

 

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
   MsgBox "teste"
End If
End Sub

 

falow um abraço

Olá Armando,

 

Obrigado pela resposta, mas o que você fez foi testar se o botão direito do mouse foi clicado, poderia ser o botão esquerdo mudando vbRightButton para vbLeftButton, mas alguém tem que clicar no botão, eu queria que através de código o botão fosse "clicado" sem que ninguém realmente precise clica-lo (uma simulação de clique), encontrei o código que move o mouse por código, sem ninguém movimenta-lo.

não pode ser simplesmente cmdBotao_Click ?

Olá,

Encontrei o código que simula o clique esquerdo do mouse sem que ninguém o toque.

Obrigado pelas respostas.

 

Oi VBRSOFT ©,

Me passa este código!! vilmarbr@yahoo.com

 

Eu precisava simular o clique do botão esquerdo do mouse, mas as dicas postadas aqui neste tópico(http://www.vbmania.com.br/vbmania/vbmforum.php?varMethod=Abrir&varID=119303&varSubPagina=1&varFiltro=filtro&TxtConteudoTitulo=SIMULAR%20CLICK&CmbModoConsulta=TITULO&OptBloqueado=9&CmbRespostas=9) não deram muito certo no meu caso, pois está sempre entrando em Loop!!

Rotina:
Private Sub Grid_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single, bDoDefault As Boolean)
    SendMessage Grid.hwnd, WM_LBUTTONDOWN, 0&, 0&
    
    Call TrataSelecaoOferta(Grid.SelectedRow, Grid.SelectedCol)
    Call Form_MouseDown(Button, Shift, x, y)
End Sub

Tem algum outro jeito usando sendkeys ou ......????
Eu preciso disto pq qdo o usuário clicar com botão direito do mouse eu tenho q selecionar a linha do vbAccelerator Grid.

Grato