PC-DMIS Help Center - 2023.1
Click here to see this page in full context

Example - Randomize Statement

Sub Main()
    Dim MValue
    Randomize          ' Initialize random-number generator.
    MValue = Int((6 * Rnd) + 1)
    Print MValue
End Sub