vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Zippen wie die Profis!  
 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
Re: Noch ne Frage... 
Autor: Boris
Datum: 13.01.04 11:44

Hy!

Hab leider in den letzten 5 Tagen nichts gefunden.

Hab das jetzt mal genauer analysiert.

der code
Dim i1 As Integer
Dim Index1 As Integer
 
With sev_List2
  For i1 = 1 To sev_List2.ListCount
    Index1 = sev_List1.SearchItem(sev_List1.List(i1), False, 0)
    If Index1 > 0 Then sev_List1.RemoveItem Index1
  Next i1
End With
muss fehlerhaft sein. Wenn Sev_list1 und Sev_list2 gleich sind, bleiben mir in sev_list1 0 Einträge stehen. Das soll auch so sein.

ist aber jetzt in list1 ein eintrag der in list2 nicht ist, bleibt mir in list1 ein eintrag stehen. jedoch nicht der, der in list2 nicht vorhanden ist, sonder immer der LETZTE der in List2 steht.



also wenn die ausgangssituation so aussieht:

List1: a, b, c, d, e, f, g, h, i
List2: a, b, c, d, e, f, g, h

Dan sollte eigentlich "i" in list1 stehen bleiben. Komischerweise bleibt aber "h" stehen. weil "h" der letzte eintrag in list2 ist. Woran könnte das liegen ? ist mit meiner Suchfunktion etwas falsch, die den Eintrag in List2 sucht ??

cu
Bris

"640 KB Ram sind mehr als irgendein Programm jemals ben?tigen wird."
- (Bill Gates - 1981)

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Fehlerabfangen in "With" - Schleife826Boris13.01.04 09:34
Re: Fehlerabfangen in "With" - Schleife447ARo13.01.04 09:51
Re: Fehlerabfangen in "With" - Schleife380Boris13.01.04 10:48
Re: Fehlerabfangen in "With" - Schleife423ARo13.01.04 10:57
Noch ne Frage...563Boris13.01.04 11:08
Re: Noch ne Frage...404ARo13.01.04 11:12
Re: Noch ne Frage...408Boris13.01.04 11:44
Re: Noch ne Frage...403ARo13.01.04 12:34
Re: Noch ne Frage...373Boris13.01.04 13:01
Re: Noch ne Frage...414ARo13.01.04 13:39
Re: Noch ne Frage...369Boris13.01.04 13:59
Re: Noch ne Frage...380ARo13.01.04 15:06
Re: Noch ne Frage...381Boris13.01.04 15:26
Re: Noch ne Frage...385Boris13.01.04 15:26
Re: Noch ne Frage...366ARo13.01.04 15:45
Re: Noch ne Frage...384Boris13.01.04 15:58
Re: Noch ne Frage...389ARo13.01.04 17:20
Re: Noch ne Frage...396Boris14.01.04 07:39
Re: Noch ne Frage...385Boris14.01.04 08:00

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