怎么写文件的时候既可以追加，又可以不另起一行？？

Question

我的程序是这样写的，每写一次就自动换行，有什么方法可以不换行而是紧接着后面吗？？
Open "c:\r.txt" For Append As #1
Print #1, StrConv(rvdata.m_data_buf, vbUnicode)
Close #1

Answer 1

Open "c:\r.txt" For Append As #1
Print #1, StrConv(rvdata.m_data_buf, vbUnicode);
Close #1
注意在print语句的后面加了一个小东西。

Answer 2

同意， happy_sea(开心海) 的！Print #1, StrConv(rvdata.m_data_buf, vbUnicode);我也是这么认为的！  
 

Answer 3

用2进制也可以open 文件后，把指针移动到末尾，用 PUT 写入2进制数据就可以了
Private Sub Form_Load()
Dim a() As Byte
Dim b As Stringb = "123456"
a = bOpen "c:\1.txt" For Binary As #1   Put #1, FileLen("c:\1.txt") + 1, aClose #1End Sub

Answer 4

但是如果把Print #1, StrConv(rvdata.m_data_buf, vbUnicode)
改成：
Print #1, rvdata.m_data_buf
那么写进TXT里的就是乱码了sss2002(冯铭) 的方法如果新建个工程就可以实现。但是在我这个工程里却不行，虽然是在同一行，可与以前写的内容隔了很多空格。

Answer 5

补充几句：
在print #n,s语句中，如果在句末加个“;”，那么下次print的内容会紧接其后
如果加个“,”，那么下次print的内容会与本次的隔几个空格，好像是一个制表符的位置，不过也不换行
如果句末什么都不加，那么下次print的内容就另起一行了If Feel(sAnswer)="满意" Then
  Call JieTie
End If

Answer 6

sss2002(冯铭) 的方法是对的，是我自己的问题。