如何将一个text控件中的内容写到.txt文件中，用api WritePrivateProfileString不行？

Question

用RichText控件就好了,里面有个SaveFile方法

Answer 1

不就是用open wrtte语句吗,或者用文件系统对象FSO

Answer 2

不想用richtext控件，因为又要.ocx，在vb5中是否好解决。

Answer 3

 Dim LineStr As String
    Dim FileNum As Long
    FileNum = FreeFile
       Open "c:\test.txt" For Output As FileNum
    
           LineStr = text1.Text
        Write #FileNum, LineStr
  
    
    Close FileNum

Answer 4

：　hhfh(黑尾砂狐)　,当然了，我刚刚吃完饭回来，稍等片刻哦，呵呵...