Example - Randomize Statement

1. Sub Main()

   1. Dim MValue

      Randomize          ' Initialize random-number generator.

      MValue = Int((6 * Rnd) + 1)

      Print MValue

   End Sub