Red de conocimiento informático - Problemas con los teléfonos móviles - ¿Cómo utiliza VB el puerto serie para enviar un conjunto de datos de código ASCII? Todos los números enviados o recibidos están representados por códigos ASCII.

¿Cómo utiliza VB el puerto serie para enviar un conjunto de datos de código ASCII? Todos los números enviados o recibidos están representados por códigos ASCII.

Subcomando privado1_Click()

Dim b() como byte, s como cadena

'b es la matriz de bytes que desea enviar al puerto serie

b = StrConv(Right(String(6, "0") amp; Hex(Text1), 6), vbFromUnicode)

'La siguiente es la verificación

For i = 0 To UBound(b)

s = s amp; Hex(b(i))

Depurar. Print s

'La siguiente es la restauración

s = Format(Val("&H" & StrConv(b, vbUnicode)), String(6, "0"))

Debug.Print s

End Sub

Sub privado Form_Load()

Text1.Text = "000042"

Fin del subtítulo