Avatar billede bgjensen Nybegynder
17. februar 2004 - 20:22 Der er 6 kommentarer og
1 løsning

Split ved komma og mellerum

Jeg bruger denne kode til at splitte med:

TekstSplit = Split(Tekst, ", ")

Altså split ved hver , som er efter fulgt af et mellerum (tomt felt)

Men det virker ikke, den splitter bare ved alle kommaer, men så får den næste værdi et mellerum i starten?
Avatar billede l3kris Nybegynder
17. februar 2004 - 20:33 #1
dim tekstsplit(), i
tekstsplit = Split(Text1, ", ")
for i = 0 to ubound(tekstsplit)
  msgbox tekstsplit(i)
next

virker fint hos mig...???
Avatar billede bgjensen Nybegynder
17. februar 2004 - 20:45 #2
det kan jeg ikke få til at virker, den kommer med en fejl: Type Mismatch på tekstsplit
Avatar billede l3kris Nybegynder
17. februar 2004 - 20:51 #3
Hvad har du dim'et dit array som?

Dim TekstSplit() as String
(eller bare Dim TekstSplit() )
Avatar billede l3kris Nybegynder
17. februar 2004 - 20:56 #4
Begge ovenstående burde virke
Prøv evt at føje nedenstående ind

if not vartype(tekst) = vbstring then
  tekst = str(tekst)
end if
Avatar billede l3kris Nybegynder
17. februar 2004 - 20:57 #5
eller helt simpelt:

msgbox vartype(tekst)
Avatar billede bgjensen Nybegynder
17. februar 2004 - 21:01 #6
så virker det, jeg prøvede at lave en ny form, og nu virker det! THX smid et svar
Avatar billede l3kris Nybegynder
17. februar 2004 - 21:17 #7
Et svar :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester