掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ポップアップ表示中に、真中ボタンクリックで別のポップアップを表示したい (ID:120063)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
真中クリックのときはマウスダウンイベントでsendkey でESCを送って。 マウスアップイベントでポップアップ表示させたらいかがでしょうか。 Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Select Case Button Case 1 Me.PopupMenu ポップアップ1 Case 2 Me.PopupMenu ポップアップ２ Case 4 SendKeys "{ESC}" End Select End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Select Case Button Case 4 Me.PopupMenu ポップアップ２ End Select End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.