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 vote231 views1 answer
Open application from vbnet
VBA
0 vote240 views1 answer
Vba variable number of arguments
VBA
0 vote248 views2 answers
Get excel file from email attachment in vba
VBA
8 votes265 views1 answer
Excel vba determine number of elements in a 2D array
VBA
0 vote227 views1 answer
Vba dictionary length
VBA
0 vote233 views1 answer
Vba code to select image in sheet
VBA
4 votes227 views1 answer
Excel formula for last non-empty cell in a column
VBA
0 vote207 views1 answer
Excel vba linter
VBA
0 vote255 views1 answer
Weekday vba
VBA
0 vote249 views1 answer
Excel vba first working day month
VBA