vb怎样在一个字符串中替换里面的另外一个字符串（vb中怎样截取字符串首字母）

Mid(String1, Start1, 1) = Mid(String2, Start2, 1)中start1是string1中要替换位置起始字符的位置，1为要替换的 个数，start2是string2中将要替换到string1中的的字符的起始位置，个数与前面相同，也为1，例：Dim a As Stringa = "abcdefghijk"Dim b As Stringb = "123456789"Mid(a, 3, 1) = Mid(b, 5, 1)Text1 = a运行结果为ab5defghijk