Get unique random number in vb.net

Dim numbers = Enumerable.Range(0, 11).ToList()
Dim RandomClass As New Random()
Dim RandomIndex As Integer
For counter As Integer = 1 To 5
    RandomIndex = RandomClass.Next(0, numbers.Count)
    MsgBox(numbers(RandomIndex))
    numbers.RemoveAt(RandomIndex)
Next

Source: stackoverflow.com

Get unique random number in vb.net

Dim RandomClass As New Random()
Dim RememberSet As New HashSet(Of Integer)

Dim RandomNumber As Integer

While RememberSet.Count < 5
    RandomNumber = RandomClass.Next(0, 10)
    If RememberSet.Add(RandomNumber) Then
        MsgBox(RandomNumber)
    End If
End While

Source: stackoverflow.com

Similar codes

1 vote232 views1 answer
How to INPUT text in shape with enter and spacein vba
VBA
0 vote239 views1 answer
Default host vbox address
VBA
0 vote232 views2 answers
Delete all controls from list of control vb.net
VBA
2 votes236 views1 answer
Vba split string
VBA
0 vote253 views1 answer
Excel vba set cell value to empty
VBA
0 vote265 views1 answer
Vba userform textbox wrap text
VBA
0 vote226 views1 answer
Vba line feed
VBA
0 vote242 views1 answer
Supprimer la valeur de celule vba
VBA
1 vote244 views1 answer
Shortcut to apply a formula to an entire column in excel
VBA
1 vote225 views1 answer
Excel vba first row in range
VBA