VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2003/04/02(Wed) 14:57 |
| 投稿者 | ： Killer |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^3: コマンドボタンでダブルクリック |
> > ダブルクリックのイベントがないので、Clickイベント内で、
> > ダブルクリックの判定処理をいれてはどうでしょうか？
>
> 多分その方法が思い浮かばないのですよね！
> もっといい方法があるかも知れませんが、一番単純な方法として
>
> Option Explicit
> Private nClick As Integer
>
> Private Sub Command1_Click()
> nClick = nClick + 1
> Dim lngSt As Long
> lngSt = Timer
> Do While Timer - lngSt < 0.5
> DoEvents
> Loop
> If nClick = 1 Then
> Debug.Print nClick
> ElseIf nClick = 2 Then
> Debug.Print nClick
> End If
> nClick = 0
> End Sub
ソースを公開するなんてすごい親切ですね！
あんまり簡単にソ−スを公開すると、その人の為にならないと思います。
ということでヒントを書いたのですが・・・
自分で考えるという事をしないといつまでたっても甘えてしまいますからね
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）