Colección de citas famosas - Diccionario de frases chinas - Cómo enviar mensajes de texto en chino a través del puerto serie en VB

Cómo enviar mensajes de texto en chino a través del puerto serie en VB

Subtemporizador privadoMSCReceive_Timer()

Si MSComm. InBufferCount & gt luego 0

TextMSCReceive. Texto = TextoMSCReceive. Texto + MSComm. Agregue

Finalizar si...

TextMSCReceive. SelStart = Len(TextMSCReceive.

Texto)

Conector final