[リストへもどる]
一括表示

投稿時間:2002/11/22(Fri) 12:26
投稿者名:むろむろ
Eメール:
URL :
タイトル:
テキストボックスに入力済みになったら
すいません。もう一つ質問させてください。
テキストボックスに任意の文字を入力して、値が更新(空欄から何かを入力した時も)
されたら発生するイベントを書きたいのですが、
ExcelであったらAfterUpdateになると思うのですが、
VBにはその命令はありますか?
無いのであればAfterUpdateと同様の物は何なのでしょうか?
LostFocusだと、一度テキストボックスを選択して、何も入力されていなく、
違うところに選択を持っていくとイベントが発生してしまいます。
なので、LostFocusではないものが良いのですが。

投稿時間:2002/11/22(Fri) 12:40
投稿者名:とろ
Eメール:
URL :
タイトル:
Re: テキストボックスに入力済みになったら
> すいません。もう一つ質問させてください。
> テキストボックスに任意の文字を入力して、値が更新(空欄から何かを入力した時も)
> されたら発生するイベントを書きたいのですが、

GotFocus 時に
テキストの内容を待避させておいて、
LostFocus 時に
待避させてある内容とテキストの内容が
異なっている場合にのみ
処理を行うようにすれば良いのでは?

投稿時間:2002/11/22(Fri) 13:29
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: テキストボックスに入力済みになったら
一度修正して元に戻しても区別がつかない等の欠点はありますが
Change イベントを使えば簡単です。

特定のWebページをIEで表示 のサンプルはここのHPの
逆引きヘルプの下記に記載されています。

Web ページを開く(ハイパーリンクもどき) 
http://www.bcap.co.jp/hanafusa/VBHLP/hyperlink.htm

投稿時間:2002/11/22(Fri) 14:04
投稿者名:魔界の仮面弁士
Eメール:
URL :
タイトル:
Re: テキストボックスに入力済みになったら
> LostFocusだと、一度テキストボックスを選択して、何も入力されていなく、
> 違うところに選択を持っていくとイベントが発生してしまいます。

LostFocudでやるとすれば、こんな感じ。

Private Sub Text1_LostFocus()
    If Text1.DataChanged Then
        MsgBox "変更されました"
        Text1.DataChanged = False
    End If
End Sub

投稿時間:2002/11/22(Fri) 15:27
投稿者名:むろむろ
Eメール:
URL :
タイトル:
Re^2: テキストボックスに入力済みになったら
みなさま、有難うございました。
大変参考になる記述、考え方を頂き本当に有難うございます。