文件保存字符串数组
代码是:
intFileNum = FreeFile()
Open App.Path & "/" & "westwin.wes" For Output As #intFileNum
Dim a(4) As String
a(0) = "0"
a(1) = "wer"
a(2) = "2"
a(3) = "sadfadf"
Write #intFileNum, a
这样会报错,我的目的是想把字符串数组a保存到文件的一行中,请问如何实现?
再问,怎么在文件的指定一行的末端写?
问题点数:20、回复次数:4Top
1 楼zyl910(编程的乐趣在于编程控制硬件,与用图形学实现绚丽效果)回复于 2002-07-31 14:04:51 得分 10
For I=0 To 3
Print ##intFileNum, a(I);
Next I
Print ##intFileNum,""
对于“怎么在文件的指定一行的末端写?”
先把文件内容全部读取出来,计算好分段位置,再写入Top
2 楼griefforyou(为你伤心)回复于 2002-07-31 14:08:03 得分 10
2.Open App.Path & "/" & "westwin.wes" For append As #intFileNum
Top
3 楼westwin(浮躁的很)回复于 2002-07-31 14:11:47 得分 0
回zyl910(910:分儿,我来了!) (L2002) :
我说的是保存到文件的一行,你的代码是分行保存了Top
4 楼westwin(浮躁的很)回复于 2002-07-31 14:25:44 得分 0
回griefforyou(为你伤心) :
我说的是在指定行的末端,不是你所说文件的末端Top




