title image


Smiley Re: Wie kann ich hier "split" einsetzen??
Vielleicht so (zum Ausprobieren mit zwei Textboxen:



Dim i As Integer

Dim text As String

Dim zeichen As String

Dim arr() As String



text = Text1.text



For i = 1 To Len(text)

zeichen = Mid(text, i, 1)

If IsNumeric(zeichen) Then

Text2.text = Text2.text & "|" & zeichen

Else

Text2.text = Text2.text & zeichen

End If

Next i



arr()=Split(Text2.text, "|")

Gruß aus Ostfriesland. Möge Tux mit Dir sein!

ff


Proggst du schon .net oder quälst du dich noch mit VB6?



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: