En realidad el sisetma no simula el presionar F1, lo que hace el comando SendKeys es enviar el código de las teclas que desees, a la aplicación en curso (específicamente al objeto que tenga el foco), por ello hace el mismo efecto de teclear F1. En cuanto a realizar el mismo efecto que el Click en una caja de texto se me ocurre que lo que debes hacer es:
declarar el evento click de la caja de texto publico.
Public Sub text1_Click()
..
...
...
End Sub
Luego en la rutina que desees que ocurra el mismo efecto del Click en la caja de texto:
2.- Envias el foco a la caja de texto
text1.setfocus
3.- Invocas el evento Click
Call Text1_Click
creo que era esto lo que necesitas.
