掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
コントロールのmouseMoveで他のコントロールにマウスがきたら？ (ID:101573)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
※VB6として書き込み もしかしたらボタン2をサブクラス化してウィンドウプロシージャを書き換えれば何とかなるかもしれませんが，私には良くわかりません． なので別解として(動作が結構変わってしまいますが)， ボタン1をドラッグ可能にして， ボタン2の DragOver イベントの Source 引数で判断してみてはいかがでしょう． 例) Option Explicit 'Form1にボタンを二つ貼り付ける． '名前はそれぞれ Command1 Command2 Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Call Command1.Drag End Sub Private Sub Command2_DragOver(Source As Control, X As Single, Y As Single, State As Integer) Debug.Print Source.Name End Sub
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.