# Re: cww请帮忙解决这个问题...

Posted by Edward on September 24, 1998 at 12:47:09:

In Reply to: cww请帮忙解决这个问题... posted by 小马 on September 24, 1998 at 08:48:41:

当你游标由text1移至text2时，
是游标进入text2之后再触发text1的lostfocus
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
所以你在text1_lostfocus写text1.setfocus
那等于就是把游标再由text2移入text1
这时又会触发text2_lostfocus，
然而你又在text2_lostfocus写text2.setfocus
此时游标又会由text1移入text2
如此循环下去，就会出现无穷回圈了。

: 请问一下今天我如果在form上布置了两个textbox,程式码如下所列:
: Private Sub Text1_LostFocus()
: MsgBox "text1 LOSTFOCUS"
: Text1.SetFocus
: End Sub

: Private Sub Text2_LostFocus()
: MsgBox "text2 LOSTFOCUS"
: Text2.SetFocus
: End Sub

: 当程式执行后,原本focus在textbox1,当我点选textbox2时,理所当然会触发textbox1的lostfocus事件,但此时程式的执行结果是会不断出现text1 lostfocus, text2 lostfocus之msgbox造成无穷回圈,为什么这两个textbox的lostfocus事件会一起触发呢?
: 之所以这样做是为了让user如果资料输入错误时不让其跳离当时的栏位,请指正其中错误,谢谢!!
: P.S.我的环境是win95 + vb6.0 sp3

Follow Ups:

- 那么我该如何作呢？ 小马 16:36:13 9/24/98 (1)
  - 没有特别的好方法 cww 08:38:14 9/25/98 (0)