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

0 vote213 views1 answer
Returns an array from function vba
VBA
27 votes468 views2 answers
Vba check if file exists
VBA
0 vote207 views1 answer
VBA Sleep Snippet
VBA
0 vote216 views1 answer
Reset border color textbox vba
VBA
8 votes290 views1 answer
Vba make integer
VBA
0 vote220 views1 answer
Excel vba convert cells address
VBA
0 vote215 views1 answer
Vba collection contains
VBA
1 vote202 views1 answer
Excel vba saveas force overwrite
VBA
0 vote205 views1 answer
Add text to combobox drop down vb
VBA
0 vote200 views1 answer
Add items to combobox vb.net
VBA