This video takes us through the process of using the Stream Writer and the Save File Dialog
Step 1
First thing you need is a Button. Click "Button" in the toolbox. Next click "Text Box" and drag it so that it has multiple lines.
Step 2
Rename the button, in this case to "SaveTheText," and in the same menu we are going to rename the caption or text from "Button 1" to "Save It"
Step 3
Click on Text Box and rename it, in this case to "TheText"
Step 4
In the toolbox, click SaveFileDialog.
Step 5
Rename SaveFileDialog to "SaveIt"
Step 6
Double click the SaveIt button and under the line beginning with "Private Sub," enter the following text:
SaveIt.InitialDirectory = "C:\"
SaveIt.FileName = "Save As…"
SaveIt.Filter = "Text Files ONLY (*.txt) | *.txt"
SaveIt.ShowDialog()
Step 7
Below this text, we are going to declare a variable by entering the following text:
Dim W As New IO.StreamWriter(SaveIt.FileName)
W.Write(TheText.Text)
W.Close()
Step 8
Click "Start Debugging." Enter some text on the first couple of lines of the text box. Click SaveIt and file dialog will pop up. Save as whatever you like (in this case ATest).
Step 9
Go to C drive and click on the text document. It should have the text that you entered in the program.
Just updated your iPhone to iOS 18? You'll find a ton of hot new features for some of your most-used Apple apps. Dive in and see for yourself:
Be the First to Comment
Share Your Thoughts