VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2004/12/07(Tue) 10:14
投稿者LESIA
Eメール
URL
タイトルRe^3: Validateイベントについて

> 返事ありがとうございます。
> 確かにEnterキーを押した場合、Validateイベントは発動しません
> でしたが、LostFocusは発動していました。
> Enterキーを押した場合に、Validateイベントを発動させる方法は
> ありますでしょうか。
> ご存知でしたら教えて下さい。

ということは、Text1のKeyPressかKeyDownに、Text2.SetFocusのコードを
書いているということでしょうか?
それでしたら、Validateイベントに書いている条件と同じコードをkeyPressや
KeyDownイベントに書いて、それがOKだったらtext2.SetFocusするように
すればいいのでは?

例えば、Text1が数値のみ入力可だとするとこんな感じ。
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = vbKeyReturn Then
        If IsNumeric(Text1.Text) Then
            KeyAscii = 0
            Text2.SetFocus
        End If
    End If
End Sub

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


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -