5.文字列の一部を置換する
1.文字列中の「円」をすべて「ドル」に置換する例
Dim St1 As String
Dim St2 As String
St1 = "キュウリ 100円、ネギ 150円、あわせて 250円"
St2 = Replace(St1, "円", "ドル")
MsgBox St2
2.文字列中の「ジョン」をすべて削除する例
Dim St1 As String
Dim St2 As String
St1 = "ジョン王は失地王とも言われるが、その由来から見てジョン王を欠地王と呼ぶほうが正しい。"
St2 = Replace(St1, "ジョン", "")
MsgBox St2
3.特定の位置を指定して置き換える例
Dim St1 As String
Dim St2 As String
St1 = "晩年の源頼朝は大姫の入内問題で失敗した。"
St2 = "<--Visual Basic 中学校-->"
Mid(St1, 3, 2) = St2
MsgBox St1
この例では最後に「晩年Vi頼朝は大姫の入内問題で失敗した。」と表示される。