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 vote390 views1 answer
Filesystemobject vba reference
VBA
0 vote327 views1 answer
Set column width of datagridview vb.net
VBA
1 vote358 views1 answer
Excel vba Populating a combobox on a userform from a range of cells
VBA
0 vote340 views1 answer
Vba timestamp -- milliseconds
VBA
0 vote310 views1 answer
Vb.net round to 2 decimal places
VBA
0 vote355 views2 answers
VB
VBA
5 votes355 views1 answer
Excel formula how to create strings containing double quotes
VBA
1 vote321 views1 answer
Vba delete array element
VBA
0 vote336 views1 answer
Ribbon show/hide
VBA
1 vote342 views1 answer
Excel vba first row in range
VBA