Visual Basic - Simular teclado URGENTEE!!

Hola ....
Necesito saber como simular que se presionan teclas en el teclado para automatizar tareas, y si estas "teclas presionadas" pueden hacer efecto en un programa que corre en la ventana de DOS

Probe con el sendkeys pero no hace eso

Muchas Gracias

Deberías utilizar BringWindowToTop para pasar la ventana de DOS hacia adelante y luego, keybd_event, por ejemplo:

lngHwnd = FindWindow("ConsoleWindowClass", "Command Prompt")

BringWindowToTop lngHwnd

strProv = "VER"

For i = 1 To Len(strProv)
keybd_event Asc(Mid(strProv, i, 1)), 0, 0, 0
keybd_event Asc(Mid(strProv, i, 1)), 0, KEYEVENTF_KEYUP, 0
Next i

keybd_event 13, 0, 0, 0
keybd_event 13, 0, KEYEVENTF_KEYUP, 0

Las funciones son:

Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Public Declare Function BringWindowToTop Lib "user32" Alias "BringWindowToTop" (ByVal hwnd As Long) As Long

Public Declare Sub keybd_event Lib "user32" Alias "keybd_event" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Cecilia... probé asi (como me dijiste) y funciona para ventanas windows, pero en un programa DOS no tiene efecto alguno.
Con sendKeys funciona en windows a la perfeccion pero con el programa DOS siempre antes de enviar la tecla indicada simula un ESC y esa tecla es justo la que cierra la aplicacion a automatizar ¿Sabes por que?. En la ayuda dice que el sendkeys no puede ser usas para aplicaciones no windows.. No se que Hacer !!!

Muchas Gracias

Como te menciono en otra respuesta, el keybd_event lo probé ayer con ese ejemplo y me funciona sin problemas. Fijate con la clase de la ventana que estás buscando.