Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Array ? wer kann helfen
Autor: Herbert
Datum: 16.10.02 15:10
Wenn ich das so richtig eingebaut habe dann... hatte ich vorher Peter, Sport Xaver, Sport Sabine, Sport und nun habe ich die gleiche reihenfolge nur das Xaver und Sport tauschten Peter, Sport Sport, Xaver ???? Sabine, Sport Habe ich was falsch gemacht oder vergessen, denn sortiert hat er in keinem Falle ! Mein Code ...bzw.deiner Dim bTausch '= damit, wenn alles richtig ist, die schleife verlassen wird Dim zTausch '= Merkvariable Dim lx '= Variable Dim Abstand '= Abstand zwischen den Vergleichsparametern Abstand = UBound(Userliste, 2) / 25 If Abstand < 1 Then Abstand = 2 ElseIf Abstand < 10 Then Abstand = 4 End If Do While Abstand >= 1 Do bTausch = False For lx = LBound(Userliste, 2) To (UBound(Userliste, 2) - Abstand) ' Ist das ganze nicht gleich... If StrComp(Userliste(1, lx), Userliste(1, lx + Abstand), 1) = 1 Then zTausch = Userliste(1, lx) Userliste(1, lx) = Userliste(1, lx + Abstand) Userliste(1, lx + Abstand) = zTausch bTausch = True ElseIf StrComp(Userliste(1, lx), Userliste(1, lx + Abstand), 1) = 0 Then ' da muss dann der zweite Vergleich rein... End If Next Loop While bTausch = True Abstand = Abstand / 2 Loop

Array ? wer kann helfen	122	Herbert	16.10.02 12:48
Re: Array ? wer kann helfen	353	Leominora	16.10.02 13:12
Re: Array ? wer kann helfen	47	Herbert	16.10.02 14:17
Re: Array ? wer kann helfen	305	Leominora	16.10.02 14:20
Re: Array ? wer kann helfen	50	Herbert	16.10.02 15:10
Re: Array ? wer kann helfen	310	Leominora	16.10.02 16:15
Re: Array ? wer kann helfen	82	Herbert	16.10.02 16:38
Re: Array ? wer kann helfen	51	Herbert	17.10.02 08:30
Hilfe	303	Leominora	17.10.02 13:09
Re: Hilfe	38	Herbert	17.10.02 14:20
Re: Hilfe	333	Leominora	17.10.02 14:27
Fehler meiner seits - auch lesen!	294	Leominora	17.10.02 14:49

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