Imports System

Imports Microsoft.VisualBasic

​

​

Public Module Module1

    Public Sub Main()

        Dim decRandomNumber as Decimal 

        Randomize()

        decRandomNumber = Rnd()

        Console.WriteLine("Random number: " & decRandomNumber )

    End Sub 

End Module

​