(求助各位高手)在VB中如何修改文件中指定行的数据
我现在有个后缀.DAT的数据文件,如下:
1 2 3 56 87 90
0.5 1.0 98
0.025 0.5
....
每行基本上都不是等长的,但是总行数已知50行,我想通过TEXTBOX控件输入信息来修改指定的某一行,比如说第三行,请各位高手赐教,最好给出代码,谢谢
[解决办法]
'这是读取 每一行的数据放在 strt 数组对应的元素上 比如第一行就是 strt(0)
Private strt() As String
Private Sub Command1_Click()
Dim LF As Long, Filetmp() As Byte
Open "e:\1.dat " For Binary As #1
LF = LOF(1)
ReDim Filetmp(LF - 1)
Get #1, , Filetmp
strt = Split(StrConv(Filetmp, vbUnicode), vbCrLf)
Close #1
End Sub
'当你把strt某一元素的值修改后 再把这个数组写回你的文件
Private Sub Command1_Click()
Dim strtmp as String
strtmp=Join(strt,vbcrlf)
Open "e:\1.dat " For output As #1
put #1, 1,strtmp
Close #1
End Sub
