UC知道vb 改写txt
来源：百度知道 编辑：UC知道 时间：2024/05/16 14:38:50
比如现在我有一个叫123.txt文件，里面的内容是
123.txt
123.dll
123.exe
就这么多字
现在我用vb编好了一个程序，里面有一个list，list里面就是显示123.txt文件里面的内容，也就是：
在list里面有
123.txt
123.dll
123.exe
这些内容
现在我有一个command1，我想实现在按下command1以后，将txt里面的内容改为:
123.txt
123.exe
该怎么弄啊
PS:txt文件里面的内容是会变的。
123.txt
123.dll
123.exe
就这么多字
现在我用vb编好了一个程序，里面有一个list，list里面就是显示123.txt文件里面的内容，也就是：
在list里面有
123.txt
123.dll
123.exe
这些内容
现在我有一个command1，我想实现在按下command1以后，将txt里面的内容改为:
123.txt
123.exe
该怎么弄啊
PS:txt文件里面的内容是会变的。
查找字符串有无 dll
有则跳过
Private Sub Command1_Click()
Dim i
For i = 0 To List1.ListCount - 1
If List1.List(i) = "123.dll" Then
List1.RemoveItem i
Exit For
Next
Open "c:\123.txt" For Output As #1
For i = 0 To List1.ListCount - 1
Print #i, List1.List(i)
Next
Close #1
End Sub
以行读取到list中然后再第二个元素，再保存到txt中更新
忘记了
^_^ 我也在学vb