Question

How to generate random numbers between N1 and N2 in VB.NET

Answer 1

Module Module1

    Sub Main()

        Dim r As Random = New Random

        Console.WriteLine(r.Next(1, 10))
        Console.WriteLine(r.Next(20, 40))

    End Sub

End Module

' run:
' 
' 5
' 20

 

70+ SQL courses for beginners and professionals

Answer 2

Module Module1

    Sub Main()

        Dim r As Random = New Random

        For i As Integer = 1 To 25
            Console.WriteLine(r.Next(10, 14))
        Next

    End Sub

End Module

' run:
' 
' 10
' 12
' 10
' 11
' 12
' 12
' 13
' 13
' 10
' 11
' 12
' 11
' 10
' 13
' 10
' 12
' 11
' 11
' 13
' 12
' 13
' 13
' 10
' 13
' 10

 

70+ SQL courses for beginners and professionals

Answer 3

Imports System
 
Public Class Test
    Public Shared Function get_random_number(min As Integer, max As Integer) As Integer
        Dim rnd As System.Random = New System.Random()
        Return rnd.Next(min, max)
    End Function
     
    Public Shared Sub Main()
        For i As Integer = 0 To 10
            Console.WriteLine(get_random_number(17, 122))
        Next
    End Sub
End Class
 
 
 
' run:
'
' 112
' 121
' 88
' 81
' 98
' 22
' 18
' 76
' 90
' 101
' 89

 

70+ SQL courses for beginners and professionals