vb 读取txt 文件到textbox vb 读取txt 文件到textbox 1.怎么通过代码创建一个文本文件，并读取，更新内容 以上为随即方式打开的文本文件 dim gfilenum as integer gfilenum = FreeFile Open "文件路径及文件名" For Random As gfilenum len=3 \'以随即方式打开一文件如果文件不存在就新建 用 get #gfilenum ,记录在文件中位置,要放取得的数据的变量\'读取操作 用 put #gfilenum ,记录在文件中位置,要放着要写入数据的变量\'写操作 close #filenum\'关闭文件 以下为顺序方式打开的文件 dim gfilenum as integer gfilenum = FreeFile Open "文件路径及文件名" For output As gfilenum \'以写入方式打开文本 print #gfilenum,要写入的文本 write #filenumber,要写入的文本 dim gfilenum as integer gfilenum = FreeFile Open "文件路径及文件名" For input As gfilenum \'以读出方式打开文本 input #gfilenum ,用来放读取的内容的内存变量名 还可用 line input#,input()等读取更详细的查 msdn 2.VB 读取文本文件时，调用Tex tStream 对象中使用OpenTex tFile 报错了。 如果是 Set f = fs.OpenTextFile("E:\\table\\trace.txt", forreading, True, TristateUseDefault) 出现错误： Run-time error \'5\': Invalid procedure call or argument 如果是 Set f = fs.OpenTextFile("E:\\table\\trace.txt)" 则不会报错。 用文件对象啊 FileSystemControl 操作就好了啊 再加上一个 TextStream 读取文件第一行就好了啊。 3.VB 通过 FileSystemObject,可以读取文本文件(.txt)。对于.bat 文件，VB 可否直接读取? bat 也属于文本类文件 可以读取 不用FSO 也行： 把文本文件内容读取TextBox： Dim TempFile As Long Dim LoadBytes() As Byte TempFile=FreeFile Open 文件名 For Binary As #TempFile Redim LoadBytes(1 To Lof(TempFile)) As Byte Get #TempFile,,LoadBytes Close TempFile Text1.Text=StrConv(LoadBytes,vbUniCode) 把TextBox内容写入文本文件： Dim TempFile As Long Dim SaveBytes() As Byte SaveBytes=StrConv(Text1.Text,vbFromUniCode) TempFile=FreeFile Open 文件名 For Binary As #TempFile Put #TempFile,,SaveBytes Close TempFile 4.打开文本文件 open ap...
