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 vote148 views1 answer
Vba run command
VBA
0 vote159 views1 answer
VBA Sort RossetaCode
VBA
0 vote167 views1 answer
Excel vba named range exists
VBA
5 votes175 views1 answer
Excel vba get user selected range
VBA
0 vote157 views1 answer
Vba simple quote
VBA
4 votes143 views1 answer
Excel vba determine number of elements in an array
VBA
0 vote154 views1 answer
Windows Presentation Foundation dark title bar
VBA
0 vote159 views1 answer
Vb run command
VBA
0 vote144 views1 answer
How to extract a file from an ISO:
VBA
0 vote161 views1 answer
Vba min
VBA