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
相关问答：
比如进程加载新的程序。
在其运行之前阻止。
然后允许后放行。
比如程序主文件路径是c:\test\test.exe，建立内容任意的文件c:\test\test.exe.manifest。
就是不知道程序文件路径。
设� ......
希望大家能够帮我下.感谢了..
源码传在大米盘 VB6 的源码 http://www.damipan.com/file/3wNoKLW.html
转为VB.NET源码.
小弟完全是新手 不懂的说.麻烦各位帮忙一下
我的EMAIL是:4452 ......
VB偶学得不错，现在大一，高三的时候就学VB了，现在学校里都是学C#和VB.NET的兄弟多。。。
偶要转行VB.NET了~当年学VB学了2年，对VB里面的常用函数都十分了解。
Select、If结构、For Next循环、等都了解。。。 ......
各位大虾：
我有一个VB调用水晶报表的系统，报表是作为一个Design嵌在VB里的，今天发现打印第一张报表正常，同样的数据，在点打印再调用一次就会报 Memory Full的错误，但是 ......
据说java语言是这样的，那VB呢？
byte[] b(byte)0x62,(byte)0x11,(byte)0x72,(byte)0x31};
try {
System.out.println(new String(b,"UTF-16"));
} catch (UnsupportedEnco ......
