[VB6 equivalent: RNG_Test]
Dim strFileName As String
Dim isOK As Boolean
strFileName = "pkiFips140.txt"
isOK = Rng.Test(strFileName)
Console.WriteLine("Rng.Test('" & strFileName & "') returns " & isOK & " (expecting True)")
See Also:
Rng.Test Method