Open a file and print in the debug window
Open a file and print in the debug window
Rate Open a file and print in the debug window
(1(1 Vote))
Public sub Form_Load()
Dim fso As New FileSystemObject
Dim strBaseName As String
strBaseName = fso.GetBaseName("D:\Test.txt")
Debug.Print strBaseName
End Sub
'This program prints Test in the debug window
Open a file and print in the debug window Comments
No comments yet — be the first to post one!
Post a Comment