Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Grössten und kleinsten Wert ermitteln
Autor: anfaenger_michael
Datum: 13.12.12 13:18
Moin moin, ich habe Werte in das 7te Subitem meiner Listview geschrieben. Beispiel: 111,48 110,25 108,58 usw. Wie bitte kann ich den den Grössten und den kleinsten Wert der Einträge ermitteln ? Meine Lösung funktioniert leider nicht. Ist mir aber ehrlich gesagt auch nicht schön midatetempn = 999999 madatetempn ="0 For x = StartSummenZeile + 1 To Summen.ListView1.ListItems.Count - 1 midate = Summen.ListView1.ListItems(x).SubItems(7) If midate > midatetempn Then midatetempn = midate End If If midate < madatetempn Then madatetempn = midate End If Next x Danke. Gruß Michael

Re: Grössten und kleinsten Wert ermitteln
Autor: mst547
Datum: 13.12.12 16:50
Hallo Michael! Prinzipiell ist das schon richtig so wie du das machst. Allerdings hast du die Vergleichsoperatoren falsch herum gesetzt. Des weiteren musst du die Werte in eine Zahl umwandeln, ansonsten werden die String-Werte verglichen. Die Umwandlung kannst du beispielsweise mit Val machen: ... midate = Val(Summen.ListView1.ListItems(x).SubItems(7)) If midate < midatetempn Then midatetempn = midate End If If midate > madatetempn Then madatetempn = midate End If ... mfg mst547

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