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 vote185 views1 answer
Find control with name vb
VBA
0 vote186 views2 answers
Excel vba store array and write to sheet
VBA
2 votes149 views1 answer
Excel vba check if string entirely alpha
VBA
4 votes139 views2 answers
Vba array length
VBA
0 vote147 views1 answer
Excel vba StartUpPosition
VBA
1 vote145 views2 answers
Vba string length
VBA
0 vote178 views1 answer
Vba userform textbox wrap text
VBA
0 vote186 views1 answer
Vba excel do not recalculate before save
VBA
0 vote179 views1 answer
Vba excel parser xml
VBA
0 vote92 views1 answer
How to make a if statement with vbs
VBA