Suchen & Ersetzen innerhalb eines Strings (VB)

Dieses Thema Suchen & Ersetzen innerhalb eines Strings (VB) im Forum "Windows XP Forum" wurde erstellt von Genesis, 27. März 2004.

Thema: Suchen & Ersetzen innerhalb eines Strings (VB) hallo, ich möchte gerne einen string nach einem wort durchsuchen, und wenn es enthalten ist, aus dem String...

  1. hallo,

    ich möchte gerne einen string nach einem wort durchsuchen, und wenn es enthalten ist, aus dem String löschen. Jetzt weiß ich nicht, wie ich einen String so bearbeiten kann, das ich etwas rausnehme. Kann mir jemand helfen? ???

    Thx
    Genesis
     
  2. aaaah ::) seltsam, das man immer dann auf die Lösung kommt, wenn man das Problem postet ;)

    Code:
    Function filter(text As String, teil As String)
            Dim zwischen As String
            Dim Temp As Integer
            Dim ergebnis As String
            zwischen = % & text
            zwischen = LCase(zwischen)
            Temp = InStr(1, zwischen, LCase(teil))
            If Temp > 0 Then
                zwischen = Mid(zwischen, 2, Temp - 2) & Mid(zwischen, Temp + Len(teil))
            End If
            If Left(zwischen, 1) =   Then
                zwischen = Mid(zwischen, 2)
            End If
            ergebnis = zwischen
    End Function
    aufruf:

    Code:
            filter text, Ich heiße
            MsgBox ergebnis
    MfG ;)
     
  3. Hi

    Das geht noch viel einfacher ;D

    Funktion:
    Code:
    Private Function FilterX(str_Text As String, str_Suchen As String) As String
         FilterX = Replace$(str_Text, str_Suchen, , , , vbTextCompare)
    End Function
    Aufruf:
    Code:
    Ausgabe = FilterX(DerText, Suchwort)
    Mfg Alexander
     
Die Seite wird geladen...

Suchen & Ersetzen innerhalb eines Strings (VB) - Ähnliche Themen

Forum Datum
Access 2003: Defaultwert für "Vergleichen" im "Suchen und ersetzen"-Dialog änder Windows XP Forum 24. März 2011
Fenster "Suchen und Ersetzen" verkleinern Windows 7 Forum 29. Aug. 2010
Word 2000: Symbol suchen und ersetzen Microsoft Office Suite 21. Feb. 2010
batch: suchen und ersetzen in textdateien Webentwicklung, Hosting & Programmierung 4. Juli 2008
suchen und ersetzen über verzeichnisse und abarbeiten einer liste Windows XP Forum 25. Sep. 2007