换文本框显示

diffy0331　发表于：2008-03-07 08:32:51 　

请教大家　如何写代码　如：　text1=1234567 当text1的数字位数超过７位的时候数字显示在text2

请查看 10 个与本帖内容相关的技术文章或帖子列表，确认对您的问题的解答是否会是列表中的其中一个解答。

钱玉炜发表于：2008-03-07 08:53:09

在TEXT1的更新后事件写如下代码:

Private Sub Text1_AfterUpdate()
If Len(Me.Text1) > 7 Then
Me.Text2.SetFocus
Me.Text2 = Mid(Me.Text1, 8, Len(Me.Text1))
End If
End Sub

diffy0331 发表于：2008-03-07 09:00:38

谢谢楼上这么详细的讲解　非常感谢　我试验一下

diffy0331 发表于：2008-03-07 09:33:00

楼上的朋友　我想再请教你一下　刚刚那个问题　当text1输入的位数超过7位时　　自动从text2显示出来　　而不需要再用鼠标点下text2　同时删除text1中的内容

总记录：3篇页次：1/1 9 1 :

Access交流中心