分类：
2009-10-11 13:50:33
我们常会在Control项的LostFocus中去Check其输入的正确性，但如 果我们按 "取消" 的CommandBox又希望不要去Check，直接结束就好 ，即，如何是是按了该CommandBox而产生的LostFocus呢？ 在LostFocus中Check Screen.ActiveControl便可得知下一个Control 是谁，便可解决这问题 Private Sub Text1_LostFocus() If Screen.ActiveControl Is Me.Command1 Then Debug.Print "按到Command1" Else Debug.Print "进行LostFoucs的程式" End If End Sub
