Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Text nach bestimmten wort löschen
Autor: Martin01
Datum: 27.07.03 13:55
Option Explicit Private Sub Form_Load() MsgBox LeftPart("Hans jagt ein Auto.", "e") & "!" End Sub Function LeftPart(ByVal Text As String, ByVal Bis As String) Dim Pos As Long If Len(Bis) = 0 Then LeftPart = "" Exit Function End If Pos = InStr(1, Text, Bis, vbTextCompare) If Pos = 0 Then LeftPart = "" Else LeftPart = Left$(Text, Pos + Len(Bis) - 1) End If End Function

Text nach bestimmten wort löschen	56	Kruemelmonster	27.07.03 13:13
Re: Text nach bestimmten wort löschen	35	Martin01	27.07.03 13:55

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