vb textbox LostFocus等问题

vb textbox LostFocus等问题
状况：
现在有2个Textbox（A和B）可以输入值，但要求A和B中的值不能一样，如何一样不能是焦点离开此Textbox
我尝试在LostFocus处理，判断若A和B的值样则使用SetFocus方法。
问题：
因为A和B一样要求，所以我在A和B的LostFocus中加了类似的代码，但问题是：如果我在A中填写比如“2”，然后到B中写入"2",接着鼠标点击A，就会发生B的LostFocus把焦点改回B，但此时A又失去焦点，导致A的LostFocus触发。。。结果就是死循环。。。。
请哪位高人指点一下，谢谢了！！

---

vb textbox LostFocus的问题（上面的有错别字）
状况：
现在有2个Textbox（A和B）可以输入值，但要求A和B中的值不能一样，如果一样则不能使焦点离开此Textbox；我尝试在LostFocus处理，判断若A和B的值样则使用SetFocus方法。
问题：
因为A和B一样要求，所以我在A和B的LostFocus中加了类似的代码，但问题是：如果我在A中填写比如“2”，然后到B中写入"2",接着鼠标点击A，就会发生B的LostFocus把焦点改回B，但此时A得到焦点又失去焦点，导致A的LostFocus触发。。。结果就是死循环。。。。
请哪位高人指点一下，谢谢了！！

---

引用

textbox都缺省属性即可：

VB code

Private Sub Text1_Validate(Cancel As Boolean)
If Text1.Text = Text2.Text Then Cancel = True
End Sub

Private Sub Text2_Validate(Cancel As Boolean)
If Text1.T……

谢谢大哥，我好笨。。。。

---

引用

我好笨。。。。

反对!!!~