Hay puertos com1, com2 y 485 en la placa base. Quiero escribir un programa vb para transmitir datos a través de 485. ¿Cómo debo escribir la parte del puerto serie en mi vb?

El puerto correspondiente del puerto 485 es RS232, por lo que el código escrito es el mismo que el de la transmisión de datos RS232

Escribí un código relevante no hace mucho, ¿ves si? es útil: comunicación mediante control MSCOMM

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

MSComm1.CommPort = 1 'Seleccione el puerto serie com1

MSComm1. Configuraciones = "9600,N, 8,1" 'Velocidad de baudios 9600, sin bit de paridad, 8 bits de datos y 1 bit de parada

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

MSComm1.InBufferSize = 1024 'Establece la longitud en bytes del buffer de recepción

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

MSComm1.InBufferCount = 0 'Borrar datos del buffer de recepción

MSComm1.OutBufferCount = 0 'Borrar datos del buffer de envío

MSComm1.InputMode = comInputModeText

'MSComm1.InputMode = comInputModeBinary

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

End Sub

Private Sub MSComm1_OnComm() recibe y envía procesando eventos

MSComm1.RTreshold = 0

Dim b como cadena

Si MSComm1.CommEvent = comEvReceive Entonces

b = MSComm1. Entrada

Text1.Text = Text1.Text & b & " "

Text1.SelStart = 0 'Len(Text1.Text)

Confirmación de llamada(b )

End If

MSComm1.RTreshold = 148

End Sub

Más relacionado: y mi sitio web yu3zx.com en el futuro Los códigos relevantes se recopilan de HTTP