作者jtcmike (逝水)
看板Visual_Basic
标题Re: [.NET] 逐行读取做判断
时间Fri Nov 13 14:22:30 2009
※ 引述《jtcmike (逝水)》之铭言：
: 读取的资料为cvs档，内有多行资料
: 想一次读取一行做判断
: 如果不包含指定的字串删除该行资料
: 如果包含指定字串则删除该字串但保留该行其他资料
: 想请教语法该如何写才能做到逐行判断
: 谢谢！
以下为程式码
Dim filename As String
Dim sr As StreamReader
Dim sw As StreamWriter
Dim line As String
Dim num As New Integer
Dim newfile As String
Dim newline As String
filename = Console.ReadLine
sr = New StreamReader(filename)
newfile = filename.Replace(".txt", ".cvs")
sw = New StreamWriter(newfile)
Do
line = sr.ReadLine()
num = line.IndexOf("(N)")
If num > -1 Then
newline = line.Remove(num, 3)
sw.WriteLine(newline)
Else
End If
Loop Until line Is Nothing
sr.Close()
sw.Close()
在 num = line.IndexOf("(N)")这一行出现
"并未将物件参考设定为物件的执行个体"
num这变数已经用new宣告了
line读进来的值为null时回圈也应该停止了才对
想不到哪里出错了，还请各位大大指教
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.120.215.228
1F：推 HatasonJa:While sr.Peek > -1 11/13 15:07
2F：→ HatasonJa:先检查是不是读到尾了再去做readLine 11/13 15:08
3F：→ jtcmike:解决了！ 谢谢H大 11/13 16:02