VB 读写文件
在VB中如何在当前目录下创建一个文件并进行方读写操作，请给出同代码示例
VB code:
Private Sub Command1_Click()
CommonDialog1.Filter = "*.txt 文件|*.txt"
CommonDialog1.ShowSave
Open CommonDialog1.FileName For Output As #1
Print #1, Text1.Text
Close #1
End Sub
Private Sub Command2_Click()
Text1.Text = ""
CommonDialog1.Filter = "*.txt 文件|*.txt"
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As #1
Do While Not EOF(1) ' 循环至文件尾。
Line Input #1, TextLine ' 读入一行数据并将其赋予某变量。
Text1.Text = Text1.Text & TextLine & vbCrLf
Loop
Close #1
End Sub
strFileName = App.Path & "\1.txt"
MsgBox strFileName
相关问答：
VB偶学得不错，现在大一，高三的时候就学VB了，现在学校里都是学C#和VB.NET的兄弟多。。。
偶要转行VB.NET了~当年学VB学了2年，对VB里面的常用函数都十分了解。
Select、If结构、For Next循环、等都了解。。。 ......
在vb这编程里似乎有很多的东西是相联系的，为什么有些人对vb的编程摸不到头脑啊！并且有些事很容易的，但是却把它们的代码变成复杂，也去想一些不能实现的东西啊！
没分了，楼主多来点分！
来接点分
......
就是设计一个计算机模拟考试系统，带有学生和管理员，所以登录窗体和主窗体想分开，登陆学生的显示学生的主窗体，登陆管理员显示管理主窗体，我只会一个窗体用一堆控件，现在享有多个主窗体，不知道怎么做，希望请大 ......
比如我打开桌面的“1.txt”文本，里面第一行是“111”，用VB怎么写个程序，可以定时改变“111”为“222”，再隔段时间变成“333”，怎么写 .....
对正在运行的文本有效吗，对正在运行的文本能不能马上看到变化（� ......
