Lo que deseas lo puedes hacer con SendKeys
Código vb:
Ver originalDim ReturnValue, I
ReturnValue = Shell("calc.exe", 1) ' Ejecuta la Calculadora.
AppActivate ReturnValue ' Activa la Calculadora.
For I = 1 To 100 ' Establece un bucle contador.
SendKeys I & "{+}", True ' Envía pulsaciones a la Calculadora
Next I ' para sumar cada valor de I.
SendKeys "=", True ' Obtiene el total general.
SendKeys "%{F4}", True ' Envía ALT+F4 para cerrar la Calculadora.
Pero si quieres aprender a programar visual basic, recuerdo que en su momento el manual
Aprenda Visual Basic 6 como si estuviera en primero me srivio mucho