•Private Sub btnSelect_Click(...)Handles btnSelect.Click
•'Display the
winning lottery numbers
• Dim randomNum As New Random()
• Dim num1, num2, num3 As Integer
• num1 = randomNum.Next(0, 10)
• num2 = randomNum.Next(0, 10)
• num3 = randomNum.Next(0, 10)
• txtNumbers.Text = num1 & " "
& num2 & " " & num3
•End
Sub