Visual Basic - Asociar botones a teclas de windows mediante vb

Hola a todos!
Tengo unos botones externos al pc que se comunican a el mediante un puerto rs232. Para saber cuando son pulsados tengo un pequeño programa en vb que es capaz de identificar cuando se pulsan dichos botones. Mi duda esta en que necesito asociar dichos botones( son tres) a ciertas teclas del teclado de windows para usar como control de otro progrma que corre en windows. ¿Cómo puedo hacerlo?

Muchas gracias y un saludo a todos los del foro!

Hola como estas ...

Si tu sabes que boton presiono y tu quieres emular que presiona por ejemplo el enter puedes leer sobre el comando SENDKEYS

Private Sub el que tu identificas

SendKeys "{tab}"
'aqui podrias envbiar la tecla q requieres espero te ayude


End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

IF KEYPRESS=13 THEN
PROGRAMA QUE DESEAS EJECUTAR
ELSE
NADA
END IF

End Sub


KEYPRESS TE DARA EL NUMERO DE LA TECLA QUE APRETASTE, EL NUMERO 13 ES LA TECLA ENTER SI APRETAS ENTER O EL BOTON QUE DESEAS EJECUTA EL PROGRAMA QUE QUIERES. CUALQUIER DUDA NO DUDEZ EN CONSULTARME.

Muchas gracias a los dos
si es mas o menos lo que andaba buscando, solo que los botones no son para ejecutar un programa, sino para controlar tres funciones de un programa. para explicarme bien os dejo el código en vb que muestra los botones provenientes del puerto rs232:

Option Explicit

Sub leer_entradas()
Do
DoEvents
If MSComm1.CTSHolding = False Then
Shape1.FillColor = QBColor(2)
Else
Shape1.FillColor = QBColor(10)

End If
If MSComm1.DSRHolding = False Then
Shape2.FillColor = QBColor(2)
Else
Shape2.FillColor = QBColor(10)

End If
If MSComm1.CDHolding = False Then
Shape3.FillColor = QBColor(2)
Else
Shape3.FillColor = QBColor(10)

End If
Loop
End Sub

Private Sub Form_Activate()
If App.PrevInstance = True Then
MsgBox " El programa ya está corriendo ", vbCritical + vbSystemModal
End
End If
Form1.Caption = "On/Off Serial"
MSComm1.CommPort = 3
MSComm1.Settings = "9600,N,8,1"
MSComm1.PortOpen = True
MSComm1.DTREnable = False
MSComm1.RTSEnable = False
Call leer_entradas
End Sub


Private Sub Form_Unload(Cancel As Integer)
MSComm1.DTREnable = False
MSComm1.RTSEnable = False
MSComm1.PortOpen = False
End
End Sub

De esta manera consigo en un pequeño ejecutable, que cuando pulse un botón el shape cambie de color, y a esto es a lo que quiero asociar las teclas de windows para controlar el otro programa.
En un principio me servirían cualquier tecla (pej: a, b , c), ya que en ese programa puedo variar los controles.

Se que soy un poco nuevo en esto por lo tanto agradezco muchísimo vuestra ayuda.
¿de que manera tengo que integrar esa orden en el codigo vb que os he puesto?

Muchas gracias!

Pues ... entiendo el codigo y lo que haces solo deberias en el momento que cambias de color enviar
SendKeys "{A}" y eso te escribira A donde se encuentre el cursor.

SAludos