<quote>hvordan deler man en række ord hvis de er adskilt af et + tegn ?
hvis man for eksempel skal dele:
hej+dette+er+en+besked
på forhånd tak :-)
Hej
Du kunne lave en funktion der gennemsøger din tekststreng. hvergang den støder på et + tegn gemmer den det der er fundet indtil da.
Det ville være lidt nemmere hvis du skrev hvilket sprog det skal laves i.......
Hvis det er c++ kan du bare skrive til mig :-)
MVH
Rasmus
det skal være i Visual Basic
</quote>
Det har jeg en løsning på!
Jeg laver et ekspel hvor stregen er det der står i tekst1 og når man klikker på knappen bliver det overført til liste1.
sub Command1_Click()
dim Tekst as string
dim I as integer
dim lende as integer
dim H as string
dim holder as string
tekst=text1.text 'definere strengen
lende=len(tekst) 'finder længden af strengen
for I=1 to lende 'laver en forlykke så vi kommer alt tekst i gennem
h=mid$(tekst,i,1) 'tag og sætter makøre på plads I i strnege tekst og makere et tegn frem
'ogsætter det tegn i
if h="+" then ' tjkker om tegent er plus så skal den stoppe, + forsvinder helt
list1.additem holder 'sætter ord i liste boxen
h="" 'gør klar til næste ord
else
holder=holder+h 'sæt de tegn der er i holder til være det samme + det nyfunde tegn
end if
next i
dette kan gøres med et hvilket som helst tegn!
Håber du kan bruge det til noget
mvh.
Thomas Christensen
