by Rade Kvrgic (1 Submission)
Category: Internet/HTML
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 16th November 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Write txt file
Open (App.Path & "\test.txt") For Output As 1
Print #1, "This is date : " & Format(Date, "yyyy-mm-dd")
Print #1, "This is time : " & Format(Time, "hh:mm:ss")
Close #1
MsgBox " You can read file: " & App.Path & "\test.txt"
End Sub
Private Sub Command2_Click()
Unload Me
End Sub