Como leer el com1

Carga un control mscomm en un form, llamalo Comm1, coloca 2 Text box y un botón. al textbox2 ponele la propiedad Multiline = True
Esto ponelo en el evento Load del form
Form1_Load()
Comm1.CommPort = 1 ' aca pones el puerto que queres utilizar, 1 es el Com1
Comm1.RTSEnable = False
Comm1.RThreshold = 1
Comm1.Handshaking = 0
Comm1.Settings = "9600,n,8,1" 'esto lo setea a 9600 baudio, pones ponerlo hasta 56000
Comm1. PortOpen = True ' este comando abre el puerto de comunicaciones, si esto te da un error es porque el puerto que seleccionastes no esta disponible o lo esta utilizando otro programa.
End Sub
El evento que captura los datos esta en el mscomm
escribi lo siguiente:
Comm1_OnComm()
If Comm1.CommEvent = 2 Then 'el 2 indica datos recibidos
Dato = Comm1.Input 'esto guarda los datos recibidos en la variable Dato
Text2.Text = Text2.text & dato
End If
End Sub
En el boton escribi lo siguiente:
Command1_Click
Comm1.Output = Text1.Text 'de esta manera envias datos al puerto
End Sub
En el text 1 escribis los caracteres que queres enviar, y utilizas el boton, en el textbox2 te van a aparecer los datos que te lleguen al puerto.
Cualquier duda estoy a tu
Disposición.