vb6.0 文本字符替换

Question

只替换文本1中的字母
替换后格式不能变
如text1里的内容
1
j
6
8
h
求制作出text2里的内容
text2里的内容
1
时
6
8
间
j=时 h=间
若没有择不替换

Answer 1

Text2.Text = Replace(Text1.Text, "j", "时")
Text2.Text = Replace(Text2.Text, "h", "间")

Answer 2

0......追问

不要乱来好吗 你这样回答了 就不能有人看见了