VB: MSComm binäre Daten senden

Hallo Helmut,

in der Hilfe steht doch, das entweder ein String oder ein Bytearray
übergeben werden kann. das Literal 5 oder 500 oder wie auch immer ist
aber weder ein String noch ein Bytearray!.

Ich mache immer alles mit Strings (auch binärdaten), das geht am
einfachsten.

Also:

MSComm1.Output = chr(5)

sendet ein Byte mit dem Inhalt 5.

MSComm1.Output = "5"

sendet ein Byte mit dem Inhalt Asc(5) = 53 !

Ich würde aber vorher noch die Eigenschaft InputMode auf Binär setzen:

MSComm1.InputMode = comInputModeBinary


Gruß, Jan

Also erstmal hat String oder Array nichts mit binär oder nicht binär zu
tun.
Du kannst genauso einen binären String wie ein "nicht binräres"
byte-Array erstellen.

Binärer String: chr(0) & chr(1) & chr(2) & chr(3)

Dein Byte-Array: Dim feld(50) as Byte
kannst du natürlich direkt an die Output-Eigenschaft des
COMM-Steuerelementes zuweisen. Dann werden alle 51 Bytes (0..50)
gesendet.

Alternativ könntest du aber auch einen 51 Zeichen langen String
erstellen und zuweisen. Folgende Beispiele machen genau dasselbe:

1)
Dim lsBinStr as String, i as Integer
For i = 0 to 50
    lsBinStr = lsBinStr & chr(i)
Next i
MSComm1.Output = lsBinStr

2)
Dim lyBinArray(50) as Byte, i as Integer
For i = 0 to 50
    lyBinArray(i) = i
Next i
MSComm1.Output = lyBinArray


Beide Beispiele senden 51 Bytes, jeweils die Zahlen von 0 bis 50.

Gruß, Jan