[文字列の置換 Replace / 「●」　を「◎」に置換する]




文字列を置換するには、Replaceを使います。全角空白を半角空白に置換したり、半角「,」を全角「，」に置換することができます。　文字列を整えるときに便利です。

---

Private Sub CommandButton1_Click()

'========================
'「●」を「◎」に置換する
'========================


Dim myStr As String
myStr = TextBox1.Text

TextBox2.Text = Replace(myStr, "●", "◎")



End Sub

---