怎样才能将文本框的文字储存到文件中？？？

如果text1中内容为  
  a  
  afdfas  
  fdsafdasfasd  
  fdsafas  
   
  用以下程序进行写入时，  
          Open   "c:\a.txt"   For   Append   As   #1  
          Print   #1,   text1.text  
  a.txt记录的为  
   
  a  
  afdfas  
  fdsafdasfasd  
  fdsafas  
   
  而我需要的记录格式为一行记录,?代表回车符。  
   
  a?afdfas?fdsafdasfasd?fdsafas  
   
  问如何才能实现上述功能，并且将上述文本按格式读入text1中。 问题点数：0、回复次数：3Top

1 楼ljc_zy（彷徨）回复于 2004-09-02 07:47:38 得分 0

Open   "c:\a.txt"   For   Append   As   #1  
          Print   #1,   replace(text1.text,vbcrlf,"?"Top

2 楼of123（）回复于 2004-09-02 08:48:08 得分 0

Open   "c:\a.txt"   For   Append   As   #1  
          Print   #1,   replace(text1.text,vbNewline,vbTab)  
  Close   #1Top

3 楼LGYAN（紫衣随想）回复于 2004-09-02 08:49:27 得分 0

Dim   s   As   String  
  s   =   Text1.Text  
  s   =   Replace(s,   vbCrLf,   "?")  
  Print   #1,s  
  用变量做可能速度上要快点吧！Top

相关问题

• aafdfasfdsafdasfasdfdsafas
• 才能
• 格式
• vbcrlf
• 记录
• 上述
• txt
• print
• replace
• open

• 帖主：dragonscorpico

• Visual Basic类图书
• Visual Basic类源码下载