VB写文本问题

来源：百度知道 编辑：UC知道 时间：2024/06/14 19:43:34
假设有一个已知路径的txt文档，其属性为系统+只读，请问如何在不改变其属性的前提下用VB在此文本中写入字符串？

首先，不改变其属性是不可能写入的，任何程序都是如此。
用代码可以实现 更改属性-->写入-->改回属性，以下是代码：
Private Sub Form_Load()
If Dir("C:\abc.txt") <> "" Then
SetAttr "C:\abc.txt", vbNormal
End If
Open "C:\abc.txt" For Output As #1
Print #1, "写入的字符串"
Close #1
SetAttr "C:\abc.txt", vbReadOnly + vbSystem
End Sub

先改属性再写再改回来不行么?