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 p>
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