Just nu i M3-nätverket
Gå till innehåll

Separator i Visual Basic


Baracuda

Rekommendera Poster

Hej!

 

Om jag har en textbox som det står följande i:

 

"Hej*På*Er*Alla*Glada"

 

och jag vill få ut dom i en listbox på följande sätt:

 

Hej

Er

Alla

Glada

 

Hur löser man det på ett lätt sätt ?

Länk till kommentar
Dela på andra webbplatser

Hej,

Det beror lite på, men mitt förslag är att du kollar in funktionerna Instr, Len, och Left.

 

Du kan via dessa kolla om tecknet * finns i din sträng, kolla hur lång strängen är, och dela upp den efter hand. Har inte tid att skriva det år dig men det borde inte vara så svårt.

 

MVH //

H&D

www.passiveminds.com

 

Länk till kommentar
Dela på andra webbplatser

Jag skulle nog gjort nåt sånt här;

   Dim str As String
   str = "Hej*På*Er*Alla*Glada"

   Dim vOrd() As String
   Dim i As Integer
   vOrd = Split(str, "*")

   For i = 0 To UBound(vOrd)
       List1.AddItem vOrd(i), i
   Next i

 

//Telleluy

[inlägget ändrat 2002-12-06 13:25:59 av Telleluy]

Länk till kommentar
Dela på andra webbplatser

Arkiverat

Det här ämnet är nu arkiverat och är stängt för ytterligare svar.

×
×
  • Skapa nytt...