Hola Chinta Nemoto.
Puedes sencillamente invocar el método que controle el evento en cuestión.
Por Ejemplo imagina un formulario llamado Form1 con este código:
Public Sub Form_Click()
MsgBox "Has hecho click"
End Sub
Desde el proyecto, cuando quieras simular un click sobre Form1, solamente has de hacer:
Form1.Form_Click y ejecutarás el código asociado al evento. Eso sí, debes tener en cuenta el declarar el método como
Public (o
Friend si lo vas a invocar desde el mismo proyecto).
La única posible complicación sería identificar sobre que control u objeto se encuentra el puntero del ratón... lo podrías solventar declarando una variable pública de objeto que se inicializaría desde el evento
MouseMove de los distintos controles...
Public MiObjeto as Object
Private Sub Text1_MouseMove( _
Button As Integer, Shift As Integer, X As Single, Y As Single)
Set MiObjeto = Text1
End Sub
Public Sub Text1_Click()
MsgBox "Click sobre Text1"
End Sub
Y luego cuando quieras simular el evento...
Private Sub ForzarClick
CallByName MiObjeto _
, MiObjeto.Name & "_Click" , vbMethod
End Sub
Espero que te sirva, Suerte.
