vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Mails senden, abrufen und decodieren - ganz easy ;-)  
 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

Suche Visual-Basic Code
Re: Und funzt  
Autor: Tempest
Datum: 23.12.01 12:30


Meine Schleife sieht zZ so aus:

For i = 0 To List1.ListCount - 1
wert = 0

For j = 0 To List1.ListCount - i

If List1.List(i) = List1.List(i + j) Then
wert = wert + List2.List(i + j)

End If

Next j

List3.List(i) = wert
Next i

Das Problem ist nun aber folgendes:
Es rechnet schön korrekt alle Werte eines Datums zusammen.
-> am Beispiel:

[liste1]
01.12.2001
02.12.2001
02.12.2001
02.12.2001
03.12.2001

[liste2]
20
10
9
8
2

-> Die Liste 3 sieht jetzt logischerweise so aus:

[Liste3]
20
27 <- 02.12. + 02.12. + 02.12
17 <- 02.12. + 02.12
8 <- 02.12
2

seht ihr das Problem.. am Beispiel sind jetzt 2 Werte zu viel in der Liste 3 ( 17 und 8 )

Wie kann ich die entfernen oder in meine Schleife schon vermeiden?
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Listen138Tempest22.12.01 14:18
Winzige Frage:439unbekannt22.12.01 15:28
Re: Winzige Frage:107Tempest22.12.01 15:38
Es wäre leichter gewesen, aber warte einen kleinen Moment ;-...426unbekannt22.12.01 15:45
Und funzt 451unbekannt22.12.01 16:26
Re: Und funzt 96Tempest23.12.01 12:30
Armalion von Ikarion183L0rd01.01.02 23:53
LAN / WAN - Gamers ... sorry436unbekannt02.01.02 00:11
Sorry295L0rd02.01.02 20:14
Ok (ot)410unbekannt02.01.02 20:18
Re: Ok (ot)96Tempest02.01.02 22:45
Danke96L0rd03.01.02 11:39
Danke92L0rd03.01.02 11:39
Re: Danke92L0rd03.01.02 11:41

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