aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--VB.Net Projects/MaxMin/MaxMin/Form1.vb4
1 files changed, 2 insertions, 2 deletions
diff --git a/VB.Net Projects/MaxMin/MaxMin/Form1.vb b/VB.Net Projects/MaxMin/MaxMin/Form1.vb
index 7c054c4..dd92d54 100644
--- a/VB.Net Projects/MaxMin/MaxMin/Form1.vb
+++ b/VB.Net Projects/MaxMin/MaxMin/Form1.vb
@@ -29,7 +29,7 @@
End Sub
Private Sub RefreshNumbers()
- For index = 0 To numberCount Step 1
+ For index = 1 To numberCount Step 1
numbers(index) = rng.Next(minimumPossible, maxiumPossible + 1) ' Exclusive upper bound
index -= numbers.Count(Function(x) x = numbers(index)) - 1 ' numbers.Count(...) is always between 1 and 2
Next
@@ -56,4 +56,4 @@
control.ForeColor = Color.Red
End If
End Sub
-End Class \ No newline at end of file
+End Class