Ich werf einfach mal 2-3 Zeilen aus nem altem Projekt in die Runde
Zuerst mußt du dir eine Buffer variable anlegen..
Code:
Dim Uart_buffer(100) As Byte
Dim Uart_buffer_str As String * 100 At Uart_buffer Overlay
In meinem Fall war dieser 100 Bytes groß und hatte ein String Overlay,
was nichts anderes bedeutet, als dass Uart_buffer_str nur eine Art Maske ist.
Damit habe ich den split Befehl direkt auf den Buffer angewendet.
Code:
Dim Uart_buffer_splitstr(20) As String * 10
Dim Uart_buffer_splitctr As Byte
Das war mein String-Array..20 Strings a 10 Zeichen..
Uart_buffer_splitctr bekommt später den Rückgabewert von split() ab.
Code:
Uart_buffer_splitctr = Split(uart_buffer_str , Uart_buffer_splitstr(1) , ",")
Wenn du deinen Buffer gefüllt hast und dein End-Byte kommt..(ich nehm dazu gerne CR&LF)..
kannst du den String splitten.. split(dein_buffer_string,dein_string_array(start_i ndex),"dein_separator")
Die Rückgabe von split ist die Anzahl der gefüllten Array Felder.
Mit Val() kannst du dann deine Strings in Zahlen konvertieren.
Ich hoffe das hilft bissl weiter.
Gruß,BastelWastel
Lesezeichen