Open "c:\UTCR\CDIM__" & x7 & ".TXT" For Output As #1
Print #1, x6 & " 10048" & dd2(2) & dd2(3) & dd2(4) & dd2(5) & dd2(6) & vbCrLf & dd2(7) & dd2(8)
Close #1
End Sub
字符串连接符最好用&,不要用+
CStr()函数是可以省略的,字符串连接后,VB会自动把非文本变量转换为文本的
这样的输出难以控制格式,应该在输出前就作好格式处理:想换行的地方加上Vbcrlf,把所有需要输出的文本连成一个字符串。然后简单的写上:Print #1,stra。
想换行的地方后面加上“Vbcrlf”