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 vote283 views1 answer
WGET FTP
VBA
0 vote287 views1 answer
Vbnet cycle through charaters in string
VBA
0 vote257 views1 answer
Excel vba hide columns
VBA
5 votes306 views1 answer
Excel vba tool to help with refactoring code
VBA
0 vote259 views1 answer
Do until vb.net
VBA
0 vote285 views1 answer
System.Runtime.InteropServices.COMException: 'Call was rejected by callee. (Exception from HRESULT: 0x80010001
VBA
0 vote286 views2 answers
Open url from vba
VBA
1 vote283 views1 answer
VBA Loop through recordset
VBA
5 votes320 views1 answer
Excel vba left word from Long Integer
VBA
0 vote262 views2 answers
Excel vba prevent save
VBA