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 votes357 views1 answer
Excel-vba get integer high byte
VBA
0 vote299 views1 answer
Excel vba center userform
VBA
0 vote335 views1 answer
Vbnet revrese the order of character in string
VBA
3 votes308 views1 answer
Excel vba change format of cell
VBA
0 vote288 views1 answer
Vbide vbproject reference
VBA
0 vote336 views1 answer
Regex numeric digits
VBA
2 votes256 views1 answer
Excel vba pause
VBA
0 vote315 views1 answer
Excel vba calculate
VBA
0 vote332 views3 answers
Write to text file vb.net
VBA
0 vote325 views1 answer
Vba variable number of arguments
VBA