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

5 votes375 views1 answer
Excel vba get low byte from INTEGER
VBA
0 vote347 views1 answer
Filesystemobject vba reference
VBA
0 vote287 views1 answer
Vba declare 64-bit ptrsafe
VBA
3 votes301 views1 answer
Extract the nth word from a text string
VBA
0 vote306 views4 answers
How to continue formula in below line in vba code
VBA
5 votes345 views2 answers
Excel vba write to the windows registry
VBA
0 vote320 views1 answer
Vba string
VBA
0 vote304 views1 answer
Vbnet click on dgv cells
VBA
1 vote300 views2 answers
Vba function return array
VBA
0 vote305 views2 answers
Get excel file from email attachment in vba
VBA