Programa VB para recibir datos desde el puerto serie Solicitud para escribir un programa en VB para recibir datos enviados a través de una línea serie

Al iniciar, cree uno nuevo, seleccione VB Enterprise Control

Agregue un control mscomm al formulario. Configure el número de puerto, la velocidad en baudios y otros parámetros

Agregue un cuadro de texto para mostrar los resultados, configúrelo para permitir múltiples líneas, permitir barras de desplazamiento verticales y ajustar automáticamente.

Añadir un temporizador. Establezca el tiempo en 500

Se inicia el evento del temporizador.

Si son datos de texto, simplemente: if mscomm1.inbuffercount gt; 0 entonces text1.text = text1.text amp mscomm1.input

Si son datos binarios, mscomm debe; ser establecido Una propiedad que permite aceptar datos binarios.

dim b() como byte

si mscomm1.inbuffercount gt; 0 entonces

a= mscomm1.input

b = a

s = ""

para i = 0 a ubound(b)

s = s amp;

siguiente

text1.text = text1.text amp; s

end if

El código anterior no se puede verificar. La idea es así.