操作文本问题
我的文本可能是这样的
1,N
2,N
3,N
4,Y
5,N
6,Y
第一个被搜的Y我要把他改成N,我怎摸做比较好一些.
前面的需求用的都是FSO与TEXTSCREAM,这倒无所谓不过最好也用这个.
非常着急谢谢大家
[解决办法]
Dim fso As New FileSystemObject
Dim xstream As TextStream, s As String
Set xstream = fso.OpenTextFile( "c:\rr.log ")
Do Until xstream.AtEndOfStream
MsgBox xstream.ReadLine
Loop
xstream.Close
这样你就可以按行读出文本了。我的想法是，你读出来后装在一个数组里面，然后更改Y--> N,然后写回
