关于VB.NET:StreamReader与StreamWriter在替换txt文档中字符时该如何使用?
我用的是VB2013UPDATE4EXPRESS。作用是:在test.txt文件中,找出所有含“key”的行,并用"hellokitty"代替,保存到此txt文件中。要求...
我用的是VB2013 UPDATE4 EXPRESS。
作用是:在test.txt文件中,找出所有含“key”的行,并用 "hellokitty"代替,保存到此txt文件中。要求要用StreamReader与StreamWriter。
先上代码:
Imports System.IO
Imports System.Text
Public Class Form1
Private Sub btnTest_Click(sender As Object, e As EventArgs) Handles btnTest.Click
Dim mytextfile As String = "F:\test.txt"
Dim line As String = ""
Dim newline As String = ""
Dim myfilereader As New StreamReader(mytextfile, Encoding.ASCII)
Dim myfilewriter As New StreamWriter(mytextfile, False, Encoding.ASCII)
Do Until myfilereader.EndOfStream
line = myfilereader.ReadLine()
If line.Contains("key") Then
newline = line.Replace("key", "hellokitty")
myfilewriter.Write(newline)
End If
Loop
myfilereader.Close()
myfilewriter.Close()
End Sub
End Class
现在问题是,一旦调试,会发生以下错误:
其他信息: 文件“F:\test.txt”正由另一进程使用,因此该进程无法访问此文件。
请问:怎样修改代码,可以达成用StreamReader与StreamWriter替换字符的作用?
谢谢。 展开
作用是:在test.txt文件中,找出所有含“key”的行,并用 "hellokitty"代替,保存到此txt文件中。要求要用StreamReader与StreamWriter。
先上代码:
Imports System.IO
Imports System.Text
Public Class Form1
Private Sub btnTest_Click(sender As Object, e As EventArgs) Handles btnTest.Click
Dim mytextfile As String = "F:\test.txt"
Dim line As String = ""
Dim newline As String = ""
Dim myfilereader As New StreamReader(mytextfile, Encoding.ASCII)
Dim myfilewriter As New StreamWriter(mytextfile, False, Encoding.ASCII)
Do Until myfilereader.EndOfStream
line = myfilereader.ReadLine()
If line.Contains("key") Then
newline = line.Replace("key", "hellokitty")
myfilewriter.Write(newline)
End If
Loop
myfilereader.Close()
myfilewriter.Close()
End Sub
End Class
现在问题是,一旦调试,会发生以下错误:
其他信息: 文件“F:\test.txt”正由另一进程使用,因此该进程无法访问此文件。
请问:怎样修改代码,可以达成用StreamReader与StreamWriter替换字符的作用?
谢谢。 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询