INF文件和TXT一样

直接创建文件不就可以了？
如果文件不存在，直接创建文件。
如果文件存在，则直接把新文件内容写如旧文件不就可以了？

尽对TXT和INF文件有用

或者其他文件的话，先检测文件在不在，如果不在，直接拷贝过来，如果文件存在，那删除旧文件再拷贝新文件

关于修改指定行比较麻烦

原理是循环所有行，填充一个数组，修改第几行，就是修改第几-1的下标的数组元素。
修改完成后在用数组合成内容填充到TXT中。

把 文本信息写入ini是用什么函数?
如果把新ini内的内容在写程序时就写到代码里，就要考虑是多行的问题.
那,我先把内容放到text1里,然后把text1的内容赋到ini里.应该可以吧.
是用什么函数呢?

是不是用put?

把你要输入的内容写入一个变量，比如contents

If Dir(App.Path + "\1.inf" , vbDirectory) = "" Then  '检测文件是否存在
     MkDir App.Path + "\1.inf"
End If
Open App.Path + "\1.inf" For Append As #1
Print #1,contents
Close #1

建议楼主学习读和写TXT的方法，很简单的。16楼是写的方法。

Private Sub Command1_Click()
Open Text1.Text For Random As #1
Put #1, Random, "D:\A\3.txt"
End Sub

为什么提示记录号错误?

Open App.Path + "\Send-content.txt" For Input As #2
                Dim contents
                Do While Not EOF(2)
                    Line Input #2, linestr2
                    contents = contents + linestr2 + Chr(13) + Chr(10)

                Loop
 Close #2

contents就是读出的多行文本的内容。

那,把text1.text赋给   D:\A\3.txt  ,是用put 还是Input?