Frage : Für die Schleife, die sich nicht richtig schlingt

Ich habe Mühe mit a für die Schleife, die nicht genau wie vorgesehen arbeitet.  

I morgens Informationen einer SQL-Datenbank ein bestimmten Betrag Zeiten hinzufügend (basiert auf einem NumericUpDown).  Die Ausgabe ist, dass, wenn das UpDown bis 3 eingestellt, sie nur die Daten zweimal addiert.  Und sie ist nicht gerade aus durch 1.  Ich prüfte das UpDown bei 12 und die Daten addiert nur 7mal.  Wenn das UpDown bis 1 oder 2 eingestellt, adaequat ist es.  Kann jemand sehen, was ich falsch tue?

Thanks im Voraus…
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
Dim addQB als ganze Zahl = 0

        Reihe verdunkeln (7) als Schnur
        Reihe (0) = „Mike“
        Reihe (1) = „Dave“
        Reihe (2) = „Brandon“
        Reihe (3) = „Dennis“
        Reihe (4) = „Jake“
        Reihe (5) = „Ken“
        Reihe (6) = „Matt“

       'NumericUpDown1.value = 7 für Prüfung
        Für i als ganze Zahl = 0 zu NumericUpDown1.Value - 1
            Für addQB = 0 zu NumericUpDown2.Value
                DraftStatusTableAdapter.Add_Player_Requirements (TheGMDataSet.DraftStatus, „QB“, Reihe (i))
                addQB += 1
            Zunächst
            addQB = 0
        Zunächst

Antwort : Für die Schleife, die sich nicht richtig schlingt

Dieses versuchen:

1:
2:
3:
4:
5:
        Für i als ganze Zahl = 0 zu NumericUpDown1.Value - 1
            Für addQB = 0 zu NumericUpDown2.Value
                DraftStatusTableAdapter.Add_Player_Requirements (TheGMDataSet.DraftStatus, „QB“, Reihe (i))
            Zunächst
        Zunächst
Weitere Lösungen  
 
programming4us programming4us