VB 求大大帮忙

显示全部楼层 · 2011-5-15 03:23:57

1=14,18
2=35,07
3=15,26
4=18,22
如果text.1.text里面输入13的话text2.text里面马上显示14,18,15,26（上面对

照的数）这个代码怎么写求大哥帮忙如看不明白加Q583452919

千问 · 2011-5-15 03:23:57

dima(4)asstring
a(1)=\"14,18\"
a(2)=\"35,07\"
a(3)=\"15,26\"
a(4)=\"18,22\"
text2.text=\"\"
fori=1tolen(text1.text)
text2.text=text2.text“,\"a(val(mid(text1.text,i,1)))
nexti
text2.text=right(text2.text,len(text2.text)-1)
代码放到text1的chang事件里

千问 · 2011-5-15 03:23:57

老师Text1.text里只能输入一个数字的输入两个就会出错，