vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
String vergleichen 
Autor: 13uro
Datum: 12.11.10 17:32
Hallo Forum

Ich habe folgendes Problem bei dem ich nicht weiterkomme:

Ich suche nach Angaben(Titel von MP3-Files), die ich in zwei verschiedenen
Schreibweisen vorliegen habe:

Einmal in der Art (der zu findende Text): "07-a_wonderful_world.mp3"
(Teilweise mit/ohne vorangestellte Zahl, mit/ohne Bindestrich,
mit/ohne Unterstrich, Klein oder Großschreibweise))

Zum anderen aus einer Listbox in der Schreibweise (Suchtext):"A wonderful world"

Zum Vergleichen benutze ich folgendes (FSO-Objekt): 
SuchText = "*" & Replace(Me.ListBox1.List(ListBox1.ListIndex, 0), " ", "*") & _
  "*"
 
For Each oFile In oFolder.Files
  If LCase(SuchText) Like LCase(oFile.Name) Then
    Gefunden = oFile.Name
  End If
Next
Die Schleife wird durchgelaufen und beim entsprechenden File erhalte
ich im Direktfenster folgende Einträge: 
? LCase(oFile.Name)
07-a_wonderful_world.mp3
? LCase(SuchText)
*a*wonderful*world*
trotzdem wird die If-Anweisung nicht ausgeführt?

habe ich hier einen Denkfehler, oder warum wird das nicht ausgeführt?
 
 

Uli

Wissen ist Macht; nichts wissen macht auch nichts!

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
String vergleichen1.05613uro12.11.10 17:32
Re: String vergleichen657Zardoz12.11.10 18:02
Re: String vergleichen66813uro12.11.10 18:10
Re: String vergleichen64313uro12.11.10 18:24
Re: String vergleichen740mst54713.11.10 14:03
Re: String vergleichen62913uro13.11.10 23:02
Re: String vergleichen666mst54714.11.10 00:49
Re: String vergleichen635Franki14.11.10 03:23
Re: String vergleichen62813uro14.11.10 13:01

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übersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel