vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Erstellen von dynamischen Kontextmen?s - wann immer Sie sie brauchen!  
 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

Fortgeschrittene Programmierung
Re: Zahlen vergleichen 
Autor: Konsi
Datum: 14.03.04 23:10

Ok jetzt hab ichs!

Lotto1(1) = 49
Lotto1(2) = 18
Lotto1(3) = 6
Lotto1(4) = 6
Lotto1(5) = 49
Lotto1(6) = 6
 
Richtig = ""
 
Z = 0
Y = 0
 
For I = 1 + Z To 6
 
    Z = Z + 1
 
        For J = 1 + Z To 6
 
          If Lotto1(I) = Lotto1(J) Then
               Richtig = Richtig & Lotto1(I) & ", "
          End If
    Next
Next
 
 
MsgBox Richtig
Funktioniert ja alles aber was ist wenn die Zahl 6 in einem Zahlenblock 3x vorkommt???

Dann sagt das Programm "49, 6, 6, 5"
Wie kann ich das alles ausschließen!
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Zahlen vergleichen1.158Konsi13.03.04 19:13
Re: Zahlen vergleichen764BernyH13.03.04 20:43
Re: Zahlen vergleichen741Konsi14.03.04 01:40
Re: Zahlen vergleichen656BernyH14.03.04 07:50
Re: Zahlen vergleichen706Konsi14.03.04 03:50
Re: Zahlen vergleichen697BernyH14.03.04 07:55
Re: Zahlen vergleichen713Konsi14.03.04 20:03
Re: Zahlen vergleichen722Konsi14.03.04 23:10

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