vb textbox LostFocus等有关问题

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触发。。。结果就是死循环。。。。
请哪位高人指点一下，谢谢了！！

[解决办法]
textbox都缺省属性即可：

VB code

Private Sub Text1_Validate(Cancel As Boolean)    If Text1.Text = Text2.Text Then Cancel = TrueEnd SubPrivate Sub Text2_Validate(Cancel As Boolean)    If Text1.Text = Text2.Text Then Cancel = TrueEnd Sub