[RESOLVED] Question about New Random

[georgesutfin]

Hello
I know how to seed the random number generator, so as to get the same sequence every time.
This is what I would like to know.

Option Explicit On
Option Strict On
Imports System.Math

Public Class Form1
       Dim rng As New Random
    Private Sub shuffleCards()
        Dim rng As New Random
    end sub

I want to know what value was used so I can set the seed to it and repeat the random sequence, if needed or just continue on. By the way I am using this to test and debug a program.
When I try to find it out I get error messages.(Error 1 Value of type 'System.Random' cannot be converted to 'Decimal'.)
Thanks in advance
George

[.paul.]

The Random seed, unless specified, is the PC TickCount at the time the Random Object is created

[dbasnett]

Public Class Form1

    Private Shared prng As New Random(1) 'remove the 1 for normal operation


    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Debug.WriteLine(prng.Next)
    End Sub
End Class

This shows what paul said.

[georgesutfin]

Thank you both.
george