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

投稿日: 2003/01/20(Mon) 13:19
投稿者魔界の仮面弁士
Eメール
URL
タイトルRe: コマンドボタン押下イベント

> コマンドボタンを押下するとコマンドボタンが使用不可になり、
> DBを検索にいくのですが、コマンドボタンが使用不可の場合でも、
> クリックすると検索終了後、すぐに次の検索を行ってしまいます。

使用可能状態に戻す「直前」に、DoEvents関数を発行してみては如何でしょうか。

Private Sub Command1_Click()
   Command1.Enabled = False   '使用禁止

   Rem 検索処理

   DoEvents    'マウスクリックやキー押下を、Command1_Clickイベントを抜ける前に処理する
   Command1.Enabled = True    '元に戻す
End Sub


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

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

- Web Forum -