Red de conocimiento informático - Conocimiento informático - Si usa VB para escribir una interfaz de computadora host, cómo comunicarse con la computadora inferior, es decir, transmisión de datos

Si usa VB para escribir una interfaz de computadora host, cómo comunicarse con la computadora inferior, es decir, transmisión de datos

He utilizado el control Mscomm

Después de configurar el MSCOMM inicial, yo mismo defino la longitud de los datos

Parte del código es el siguiente:

Private Sub initcom( ) Bloque de programa de inicialización del puerto serie

MSComm1.CommPort = 1 'Seleccione el puerto serie com1

MSComm1.Settings = "9600, N, 8, 1 " 'Velocidad de baudios 9600, ninguna Bit de paridad, 8 bits de datos, 1 bit de parada

MSComm1.InputLen = 0 'la entrada leerá todo el contenido del buffer de recepción

MSComm1.InBufferSize = 1024 'Establecer la longitud del búfer de recepción en bytes

'MSComm1.PortOpen = True 'Abrir el puerto de comunicación

MSComm1.InBufferCount = 0 'Borrar los datos del búfer de recepción

MSComm1 .OutBufferCount = 0 'Borrar datos del búfer de envío

MSComm1.InputMode = comInputModeText

'MSComm1.InputMode = comInputModeBinary

'periodic. inteval = 100 'Establece el intervalo de tiempo de ls, de modo que el comando de telemetría se envíe una vez cada ls

End Sub

Private Sub MSComm1_OnComm() recibe y envía eventos de procesamiento

MSComm1.RTreshold = 0

Dim b como cadena

Si MSComm1.CommEvent = comEvReceive Entonces

b = MSComm1.Input

Text1.Text = Text1 .Text amp; b amp;

End If

MSComm1.RTreshold = 148

End Sub

Más relacionado: /board.asp?boardid=3 y mi sitio web yu3zx.com estará relacionado en la futura colección de códigos