vb按钮将指定的字覆盖到指定文件

来源：百度知道 编辑：UC知道 时间：2024/09/28 11:36:14
我想把abc
abd
asf
按行列方式覆盖到同目录的a.ini中，这个文件不被打开。自动修改。如何实现？覆盖后以前内容全部删除，剩下
abc
abd
asf
本人继续，谢谢各位高手！回答满意必有重赏（加分）

建一个Command1。
代码如下。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Private Sub Command1_Click()
Open IIf(Len(App.Path) > 3, App.Path & "\", App.Path) & "a.ini" For Output As 1
Print #1, "abc"
Print #1, "abd"
Print #1, "asf"
Close
End Sub

在按钮事件中写如下代码
Open app.Path & "\a.ini" For Output As #1
Print #1, "abc"
Print #1, "abd"
Print #1, "asf"
Close #1
就行了,原文件自动覆盖