【求助】vb文件操作的问题
问题1：我有一个20多M的数据文件，我将这些数据文件数据分离出来，分别放在4个文件里面，但是这4个文件却达到的90多M，我很是想不明白，用什么方法可以解决，下面是我的存数据的源代码：注：ChannelData(）是一个三维数组，就是要将这个数组中的数据剥离开来，分别存放到不同文件里。
For jj = 0 To 7 'ChannelData()数组的第一维数据，取值为0~7
If ChannelFlags(jj) = True Then 'if语句在前面的程序中就限定了最多只有4个有效，所以做多只能存成4个文件
Open (FilePath & "\" & jj & ".txt") For Output As #1
For kk = 0 To SampleNum
Print #1, Tab(15 + kk * 15)
Print #1, CStr(SampleDot(kk))
Next kk
Print #1, (Chr(13) + Chr(10))
For i = 0 To (UBound(ChannelData, 2))
Print #1, CStr(i + 1)
For kk = 0 To (SampleNum - 1)
Print #1, Tab(15 + kk * 15)
Print #1, CStr(ChannelData(jj, i, kk))
Next kk
Print #1, (Chr(13) + Chr(10))
Next i
Close #1
End If
Next jj
问题2：还是上面的一段代码，我希望是输入完15个（或者其他个）数据才换行，但是print语句再输入每个数据后都换行了，大虾们，有什么办法在输入的文件中（全是文本文件）可以自己控制换行。好像write也是这样子，每输入一个就换行。在一个语句中写多个变量好像也不行，因为需要写在一行里的数据是不定的，要根据数据文件来定。
问题3：我上面的代码是将数据存成字符串格式的，主要是为了方便文本文件中的数据格式对齐，有什么办法可以存成数据格式的（如single型），有可以自己控制文本中数据的输入位置，以便对齐。
谢谢了！
[此贴子已经被作者于2007-11-5 8:54:51编辑过]
