This Text file is old! In a 🏛️Museum, an unsorted archive of (user-)pages. (Saved from Geocities in Oct-2009. The archival story: oocities.org)
--------------------------------------- (To 🚫report any bad content: archivehelp @ gmail.com)

Dim Filename As String

Private Sub Label1_Click()

End Sub

Private Sub Label12_Click()

End Sub

Private Sub Label2_Click()

End Sub

Private Sub Load_Click()
Filename = InputBox$("Enter File Name")
Open Filename For Input As #1
Text1.Text = Input$(LOF(1), 1)
Close #1
End Sub

Private Sub Save_Click()
Filename = InputBox$("Enter File Name")
Open Filename For Output As #1
Print #1, Text1.Text
Close #1
End Sub

Private Sub Text3_Change()

End Sub