Hola zelk
Necesitas usar el siguiente objeto COM:
MSComm
Configurar settings:
MSComm1.CommPort = 1
MSComm1.Settings = "9600,N,8,1"
Para abrir cerrar puertos:
MSComm1.PortOpen = False/True
Para enviar datos:
MSComm1.Output = "Cadena"
Para recibirlos:
variable = MSComm1.Input

Y ya esta, espero haberte servido de ayuda

Responder