PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : Code aufteilen



elkokiller
17.08.2008, 18:00
Hallo,

ich stehe mal wieder vor einem Problem.
Über die serielle Schnittstelle erhalte ich folgenden Code:

0-0-28-24-0-1-0-105

Jede Zahl kann zwischen 1 und 3 Stellen haben. Sie sind immer durch einen - getrennt.

Ich möchte nun drei Varianlen V1, V2, V3, V4, V5, V6, V7 und V8 mit dem jeweiligen Zahlenwert füllen und breche mir ganz schön einen ab.
Sicher geht das ganz einfach
Kann mir jemand helfen?

Tobias

python_rocks
17.08.2008, 18:17
Jede Zahl kann zwischen 1 und 3 Stellen haben. Sie sind immer durch einen - getrennt.
Hallo Tobias!

Du kannst den Text mit dem SPLIT-Befehl http://avrhelp.mcselec.com/index.html?split.htm aufteilen. Du erhälst die aufgeteilten Daten in einem Array. Der Inhalt des Arrays sind einzelne Strings. Wenn du Zahlen brauchst, dann musst du sie nur noch mit VAL einzeln in Zahlen umwandeln und deinen Variablen zuweisen.

mfg
Gerold
:-)

PS:


Dim Tmp As Byte
Dim S As String * 31
Dim Arr(8) As String * 3
Dim V0 As Byte
Dim V1 As Byte
Dim V3 As Byte
...

S = "0-0-28-24-0-1-0-105"
Tmp = Split(s , Arr(1) , "-")
V0 = Val(arr(1))
V1 = Val(arr(2))
V3 = Val(arr(3))
...

elkokiller
17.08.2008, 18:21
Super, Danke python_rocks