string1 の 2 文字目から始まる 3 文字の文字列「BCD」が、string2 の先頭から 3 文字の「123」で置き換えられます。
Dim string1 As String, string2 As String
string1$ = "ABCDEF"
string2$ = "12345"
' Replace the characters "BCD" in string1
' with the characters "123" in string2.
Mid$(string1$, 2, 3) = string2$
Print string1$ ' Output: A123EF
string1 の 2 文字目から始まる 3 文字の文字列「BCD」が、string2 の先頭から 3 文字の「123」で置き換えられます。