Forms VisualBasic Script

Sub strDemo19()
   Debug.Print Dir("C:\Windows\*.ini")
End Sub