引用符内のテキストを取得して表示したいと思います。
名前「ジョン」
テキストボックスの内容に置き換えます
名前「なんでも」
これはすべて.txtファイルにあります
ファイルを1行ずつ読み、単語ごとに分割し、二重引用符で囲まれたテキストを見つけて、テキストボックスのテキストに置き換える必要があります。
読んで置き換えるコードを提供しました。最後に書き込み関数を作成して、txt ファイルに書き戻します。
使用法:
Try
' Create an instance of StreamReader to read from a file.
Dim sr As StreamReader = New StreamReader("TestFile.txt")
Dim line As String
Dim FullContent as string=""
' Read and display the lines from the file until the end
' of the file is reached.
Dim strArray() as string=Nothing
Do
Array.Clear(strArray,0,strArray.Length)
line = sr.ReadLine()
strArray=line.split(" ") 'To read Every Word Seperated by a Space
For i=0 to strArray.Count-1
'Checks StartsWith and EndsWith " - Eg. Ashi likes "firefox"
If strArray(i).StartsWith("""") and strArray(i).EndsWith("""") then
'Replace the string in "firefox" with TextBox1 text
line.Replace("""" & strArray(i) & """",trim(TextBox1.Text))
End If
FullContent = FullContent & line 'Append the changes to full content
Next
Loop Until line Is Nothing
sr.Close()
'Now you can write the FullContent Back to Txt File which has the replaced changes
'writeFunction(FullContent)
'If you want to display, then
msgbox(FullContent)
Catch E As Exception
' Let the user know what went wrong.
Console.WriteLine("The file could not be read:")
Console.WriteLine(E.Message)
End Try
vb.net + streamreader および vb.net + streamwriter の例をグーグルで検索してみてください。