What I'm trying to do is assign 2 different random variables to 2 different labels. The variables are supposed to be between 1 and 10. When I click the button to generate the random numbers, they are always the same, why is that? It's driving me nuts lol.
Code
Option Explicit On
Option Infer Off
Option Strict On
Public Class Form1
' class-level variable
Private randomInteger1 As Integer
Private randomInteger2 As Integer
Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
End Sub
Private Sub exitButton_Click(sender As Object, e As EventArgs) Handles exitButton.Click
Me.Close()
End Sub
Private Sub resetButton_Click(sender As Object, e As EventArgs) Handles resetButton.Click
' prepare to assign new random numbers
Dim randGen1 As New Random
Dim randGen2 As New Random
' generates 2x random numbers from 1 to 10
randomInteger1 = randGen1.Next(1, 11)
randomInteger2 = randGen2.Next(1, 11)
' display new values
number1Label.Text = CStr(randomInteger1)
number2Label.Text = CStr(randomInteger2)