vb读文件操作

[fengxin107]

我想对一个文件进行操作,包括打开,读,写等操作.最好有原程序例子.
如果能立即解决问题我愿再加50分-100分.

[lihonggen0]

Private Sub Command1_Click()
Open "f:\d.txt" For Input As #1
Text1.Text = StrConv(InputB$(LOF(1), 1), vbUnicode)
Close #1
End Sub

[lihonggen0]

写操作
Open "c:\file.txt" For Append As #1
Print #1, , "xxxxx"
Close #1

[lihonggen0]

把文本文件内容读取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

[yinbin]

兄弟，你操作的文件是二进制还是文本文件，如果是文本文件，楼上那位朋友说得对，如果是二制有点出入，你把要求写出来，我写代码给你，

[entice]

两个流，如何合成一个流？？？？？
两个流，如何合成一个流？？？？？
两个流，如何合成一个流？？？？？
两个流，如何合成一个流？？？？？
两个流，如何合成一个流？？？？？
两个流，如何合成一个流？？？？？
两个流，如何合成一个流？？？？？