Imports System

Imports Microsoft.VisualBasic               

​

Public Module Module1

    Dim myvar As Integer 

    Public Sub Main()

        Randomize()

        myvar = CInt((5* rnd()) + 1)

        Console.Writeline("Your random dice number is " & myvar)

        Console.Readline()

    End Sub

End Module

​