ヘッダー

表紙 > VB.NET サンプル >

VB.NET 2002, VB.NET 2003, VB2005

文字列の一部を置換する

1.文字列中の「円」をすべて「ドル」に置換する例

VB6対応 VB.NET2002対応 VB.NET2003対応 VB2005対応

Dim St1 As String
Dim St2 As String

St1 = "キュウリ 100円、ネギ 150円、あわせて 250円"

St2 = Replace(St1, "円", "ドル")

この例ではSt1には置換前の文字列、St2には置換後の文字列がセットされた状態になる。

 

VB.NET2002対応 VB.NET2003対応 VB2005対応 

Dim St1 As String
Dim St3 As String

St1 = "キュウリ 100円、ネギ 150円、あわせて 250円"

St3 = St1.Replace("円", "ドル")

この例でもSt1には置換前の文字列、St3には置換後の文字列がセットされた状態になる。

 

2.文字列中の「ジョン」をすべて削除する例

VB6対応 VB.NET2002対応 VB.NET2003対応 VB2005対応 

Dim St1 As String
Dim St2 As String

St1 = "ジョン王は失地王とも言われるが、その由来から見てジョン王を欠地王と呼ぶほうが正しい。"

St2 = Replace(St1, "ジョン", "")

この例ではSt1には置換前の文字列、St2には置換後の文字列がセットされた状態になる。

 

VB.NET2002対応 VB.NET2003対応 VB2005対応 

Dim St1 As String
Dim St3 As String

St1 = "ジョン王は失地王とも言われるが、その由来から見てジョン王を欠地王と呼ぶほうが正しい。"

St3 = St1.Replace("ジョン", "")

この例でもSt1には置換前の文字列、St3には置換後の文字列がセットされた状態になる。

 

3.文字の位置を指定して置き換える例

以下の例では文字列の4文字目から3文字分を別の文字列と入れ替える。

VB6対応 VB.NET2002対応 VB.NET2003対応 VB2005対応 

Dim St1 As String
Dim St2 As String

St1 = "晩年の平清盛は大姫の入内問題で失敗した。"
St2 = "源頼朝"

Mid(St1, 4, 3) = St2

この例ではSt1の値は「晩年の源頼朝は大姫の入内問題で失敗した。」となる。St2の値は変化しない。

メモ:歴史的観点からは置換後のSt1が正解で、置換前のSt1は誤りです。