Question

How to generate a random double number between min and max in VB.NET

Answer 1

Imports System

Public Class GenerateRandomDoubleNumber_VB_NET
    Public Shared Function GenerateRandomDoubleNumberMinMax(ByVal min As Double, ByVal max As Double) As Double
        Dim random As Random = New Random()
		
        Return random.NextDouble() * (max - min) + min
    End Function

    Public Shared Sub Main(ByVal args As String())
        Dim min As Double = 70
        Dim max As Double = 100
		
        Dim d As Double = GenerateRandomDoubleNumberMinMax(min, max)
		
        Console.WriteLine(d)
    End Sub
End Class



' run:
'
' 87.2863115217939
'

 

70+ SQL courses for beginners and professionals