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 vote278 views1 answer
Excel vba arrondir
VBA
1 vote331 views1 answer
Vba loop through files in folder
VBA
0 vote308 views1 answer
Dlete rows with blanks and space " " vba
VBA
1 vote367 views1 answer
Perform http request in vb.net
VBA
1 vote311 views1 answer
Excel vba unload userform
VBA
0 vote328 views1 answer
Date as number vb
VBA
0 vote314 views1 answer
Excel vba saveas no prompt for overwrite
VBA
31 votes451 views1 answer
Excel vba function to convert column number to letter
VBA
3 votes347 views1 answer
Vba post request json
VBA
0 vote325 views1 answer
Excel vba send HTTP POST to server
VBA