22. november 2002 - 18:07Der er
6 kommentarer og 1 løsning
Vende streng
Jeg har en streng:
varName="Hansen Erik"
Nu vil jeg så godt have vendt den om således at den skriver, "Erik Hansen". Det skal så også være således at var strengen "Hansen Peter Erik" så ville den skrive "Erik Peter Hansen" o.s.v.
Jeg har en idé til en funktion der kan bytte det rundt, men har lige et enkelt spørgsmål... Hvad hvis der er fire ord i din streng? Hvordan skal den så vendes?
Hvis der er 4 ord skal de vendes som deres nummeriske placering 1 2 3 4 bliver til 4 3 2 1 som med funktionen StrReverse blot med hele ord adskilt med mellemrum.
Hvis vi gør det perfekt sørger vi for det sidste mellemrum også fjernes
Function Reverse(str) strArr = Split(str) For I = UBound(strArr) To 0 Step - 1 strRev = strRev & strArr(I) & " " Next Reverse = Left(strRev,Len(strRev) - 1) End Function
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.