[VB6 equivalent: RNG_MakeSeedFile]
Debug.Print("Testing Rng.MakeSeedFile ...")
Dim strSeedFile As String
Dim fIsOK As Boolean
strSeedFile = "seed.dat"
fIsOK = Rng.MakeSeedFile(strSeedFile)
Debug.Print("Rng.MakeSeedFile('" & strSeedFile & "') returns " & fIsOK & " (expecting TRUE)")
See Also:
Rng.MakeSeedFile Method (String)
Rng.MakeSeedFile Method (String, String, Rng.Strength)