Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Ab 1 Leerzeichen am Anfang einer Zeichenfolge alles davor löschen ?
Autor: alert
Datum: 14.01.03 17:56
Hallo Dieter, hat noch leider nicht so ganz geklappt, wenn ich das so übernehme wie es von Dir gepostet wurde tut sich null, erst wenn ich es in Text2.Text schreibe. Ich wollte in Text1.Text alle Zeichen vor dem ersten Leerzeichen und alle Zeichen hinter dem letzten Leerzeichen löschen incl. der Leerzeichen. Das ganze über alle Einträge, die bis zu 3000 enthalten können. Option Explicit Private Sub Command1_Click() Dim sText As String sText = Text1.Text sText = Mid$(sText, InStr(sText, " ") + 1) sText = Left$(sText, InStrRev(sText, " ") - 1) Text2.Text = sText End Sub dabei wird aus: 10 Beispiel10 3456 11 Beispiel11 9484 12 Beispiel12 3454 dies: Beispiel10 3456 11 Beispiel11 9484 12 Beispiel12 rauskommen soll: Beispiel10 Beispiel11 Beispiel12 wo liegt da der Fehler den ich gemacht habe ? gruß, alert

Ab 1 Leerzeichen am Anfang einer Zeichenfolge alles davor lö...	564	alert	13.01.03 23:36
Re: Ab 1 Leerzeichen am Anfang einer Zeichenfolge alles davo...	360	Dieter	14.01.03 02:02
Re: Ab 1 Leerzeichen am Anfang einer Zeichenfolge alles davo...	396	alert	14.01.03 17:56
klappt leider immer noch nicht	332	alert	15.01.03 11:48
Re: klappt leider immer noch nicht	347	Dieter	15.01.03 12:35
klappt fast...	337	alert	15.01.03 15:00
Re: klappt fast...	334	Dieter	15.01.03 15:37
hmmmmmmmmmmm	337	alert	15.01.03 16:15
Re: hmmmmmmmmmmm	51	hannes	16.01.03 11:35
Re: hmmmmmmmmmmm	334	alert	16.01.03 12:05
Re: hmmmmmmmmmmm	41	hannes	16.01.03 12:09
Re: Ab 1 Leerzeichen am Anfang einer Zeichenfolge alles davo...	332	alert	16.01.03 11:14
Re: Ab 1 Leerzeichen am Anfang einer Zeichenfolge alles davo...	335	alert	16.01.03 13:17

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen