Question

How to simulate rolling two dice (game cubes) with values 1–6 in Java

Answer 1

Imports System

Module DiceRollProgram

    Private rng As New Random()

    ' Returns a random number from 1 to 6
    Function RollDice() As Integer
        Return rng.Next(1, 7)   ' 1–6 inclusive
    End Function

    Sub Main()
        Dim dice1 As Integer = RollDice()
        Dim dice2 As Integer = RollDice()

        Console.WriteLine("Dice 1: " & dice1)
        Console.WriteLine("Dice 2: " & dice2)
    End Sub

End Module



' run:
'
' Dice 1: 6
' Dice 2: 3
'

 

70+ SQL courses for beginners and professionals