Home > Available Help Files > PC-DMIS BASIC Language > Language Reference A – Z > Put Statement > Example - Put Statement
Current Help File: PC-DMIS Basic (View Core Help)
Example - Put Statement
Sub Main ()
Dim myText As String
Dim myFileContents As String
Open "d:\temp\test.txt" For Output As #1 ' Open to write file.
myText = InputBox("Type some text to add to the file")
Put #1,,myText 'Writes the text to the file assigned to #1.
Close #1
End Sub