VB6 _Validationイベントは= Falseの

Question

CausesValidationで[キャンセル]ボタンをするためにタブ移動するとき、私は、以下の単純化された説明に似たような状況を持って発射ありません整数。イベントtxtQty_Validateは、ユーザーの入力を検証し、フォーカスを変更する前にエラーを修正するために使用されます。これは、txtQtyを除いて、フォーム上の他のすべてのコントロールと大きく機能します。これは、のフォームのボタンがプロパティーを取り消すためであると仮定します.CausesValidationは必然的にfalseに設定されています。従ってにtxtQtyからユーザタブは（そののTabIndex次ある）キャンセルボタンときに適切txtQty_Validationイベントをトリガしません。

私の最初の本能は、単純に（私はすでにTABキーとしてRETURNキー振る舞いをするために使用しています）txtQty_KeyPressイベントに行くとTABキーをキャプチャし、一時的にCausesValidationを切り替えましたプロパティを使用して、txtQty_Validationイベントを発生させることができます。しかし、それは私が思っていたほど簡単ではないように、のTABをキャプチャしているようです。

提案がありますか？私はFormを作成する誰もがこのような状況に遭遇したのはこれが初めてではないと思います。

おかげ

Answer 1

[キャンセルGotFocusイベントでこれを試みることができます。

Dim b As Boolean 

Call txtQty_Validate(b) 
If b Then txtQty.SetFocus 

あなたは上司です。この

Private Sub txtQty_Validate(Cancel As Boolean) 
    If Not IsNumeric(txtQty.Text) Then 
     Cancel = True 
    End If 
End Sub