Question

vb 写入文件

比如我有两个数组分别是s1和s2,里面各有5个数据，“1,2,3,4,5”，“6,7,8,9,10”
怎么写入一个txt文件让他这样显示
1 6
2 7
3 8
......
当然不是要一次性写入的，如print #,s1(i);s2(i),不要这样写入，要先写入s1，然后再写入s2

Answer 1

目测实现困难，请明示具体功能需要，是否有回旋余地

Answer 2

'按您的要求分两次写入，首先先提取s1
T1 = Join(s1, "")
'再次提取s2
T2 = Join(s2, "")
's1与s2组合成您需要的文本格式
For i = 1 To Len(T1)
T3 = T3 & Mid(T1, i, 1) & " " & Mid(T2, i, 1) & vbCrLf
Next
'写入文本，保存在"D:\1.txt"
Open "D:\1.txt" For Output As #1
Print #1, T3
Close #1