Faktisk, er der gjort rede for den slags udredninger af strenge. Om strengen
er:
a12,b34,29d,145s etc.
eller.
a12 b34 29d 145s gør ikke nogen forskel.
Du skal bruge Split(Array). Den tager nemlig en streng, og deler den ud i en
array, vha. "splittegnet", første eksempel er det komma (','), andet
eksempel mellemrum.
Sub
Dim str as String
Dim arr() as String 'Arrayen
Dim i as Integer
str = "a12 b34 29d 145s"
arr = Split(str, Space(1)) '= Split(a12 b34 29d 145s, " ")
For i = 1 TO UBound(arr)
Debug.Pring i & ":" & chr$(9) & arr(i)
Next
End Sub
Det skulle så returnere:
1: a12
2: b34
3: 29d
4: 145s
Dette kan så naturligvis fortsætte ud i det (næsten) uendelige. Hvordan du
så tjekker resultaterne, er dit nye problem. Go' fornøjelse.
Stefan McKinnon Edwards
www.iysik.com
"Lasse Madsen" <Lasse.madsen@elektronik.dk> wrote in message
news:ae8741$t7r$1@news.cybercity.dk...
> Hej ...
>
> Jeg er ved at lave et lille "stand-in" program til et andet
> programmeringssprog ... programmet skal evaluere en string og afhænig af
> dens indhold fortolke diverse bokstaver og tal til en hexadecimal kode ...
> feks
>
> bruger taster feks "abc 12 3cba 231" i en tekst boks dette bliver så lavet
> om til en string (er det ikke det nemmeste?) der hedder str
>
> hvis vi siger at følgende bokstaver er disse værdier værd.
> a = 00
> b = 01
> c = 02
> 1 = 03
> 2 = 04
> 3 = 05
>
> Og et mellemrum (space) er lig med 06 hvordan i hulen kan man så gå ind og
> kigget på de enkelte bokstaver i en streng og så ud fra dem omsætte dem
til
> en værdi ??
>
> kan det overhovedet ladesig gøre ?
>
> M.v.h
> Lasse Madsen
>
>
>