读书人

操作文本有关问题

发布时间: 2012-02-19 19:43:39 作者: rapoo

操作文本问题
我的文本可能是这样的
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,然后写回

读书人网 >VB

热点推荐