vb类似翻译的问题

来源：百度知道 编辑：UC知道 时间：2024/05/09 02:49:50
RT
比如a="1234" b="2345"
现在在text1中输入ab
如何使text2中出现“12342345”？
如果还有c,d,e,f.......呢？
希望能够给我说明原理一下

a = "1234"
b = "2345"
Text1.Text = "ab"
Text2.Text = Replace(Replace(Text1, "a", a), "b", b)

在 text1_keypress(keyascii As Integer) 事件中分析 text1.text，例如：
nStr=text1.text
然后将nStr中的a替换为1234
将nStr中的b替换为2345
.....
最后 text2.text=nStr

for i=0 to len(text1.text)-1
text2.text=text2.text & mid(text1.text,i,1)
next i