[讨论]怎样输一段入数据后，显示相应的数据

沙发

merry05 [专家分：8920] 发布于 2009-06-22 23:01:00

key_press中对text2.text赋值

板凳

artless [专家分：1490] 发布于 2009-06-22 23:04:00

相对什么？

3 楼

tjhyzg [专家分：0] 发布于 2009-06-23 07:35:00

比如说文档格式是这样的

000001 姓名1
000002 姓名2

我在第一个文本框内输入000001，第二个文本框就能立刻显示姓名1

呵呵，不知道有没方法实现啊，谢谢各位了，最好能有代码哦

4 楼

artless [专家分：1490] 发布于 2009-06-23 10:51:00

不好意思，看错了，我路过的。

5 楼

老大徒伤悲 [专家分：29120] 发布于 2009-06-23 15:10:00

你的思路有问题。
例如，你输入第一个0，怎么办？输入第二位，如果是01，怎么办？然后输第三位，成为015怎么办？

6 楼

wangyanghetaohua [专家分：110] 发布于 2009-06-23 16:54:00

不就是text2.text=text1.text1呀？

7 楼

tjhyzg [专家分：0] 发布于 2009-06-23 18:37:00

我的意思是只有当输入六位数，并且文档中有这个数时，才能显示后面的

8 楼

老大徒伤悲 [专家分：29120] 发布于 2009-06-23 22:04:00

那你把你的意思说清楚啊

9 楼

老大徒伤悲 [专家分：29120] 发布于 2009-06-23 22:06:00

Private Sub Text1_Change()
If Len(Text1) = 6 Then
Text2 = 姓名(Int(Text1))
End If
End Sub

10 楼

我是大喊三 [专家分：3010] 发布于 2009-06-24 13:49:00

要输全6位数字?不嫌麻烦吗,前面是零的就忽略好了

您尚未登录，请登录后再回复。点此登录或注册

主题：[讨论]怎样输一段入数据后，显示相应的数据