'Alt＋z'キーを押しながらマウスのドラッグを制御する方法
お世話になっております。
VBで'Alt＋z'キーを押しながらマウスのドラッグを制御するのがうまくいかなくて困っています。
実行すると実際には各ボタンは押されているようなのですが、手動でやるような動作をしないのです。
どこか、問題個所はありますでしょうか？ご教授お願い致します。
Private Const VK_Z = 90 'Zキー
Private Const MOUSE_MOVED = &H1
Private Const MOUSEEVENTF_LEFTUP = &H4 '左ボタンUP
Private Const MOUSEEVENTF_LEFTDOWN = &H2
Call keybd_event(&H12, 0, 0, 0)'Altキー押下
Call keybd_event(VK_Z, 0, 0, 0)'Zキー押下
Call mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)
'マウス左ボタン
Call mouse_event(MOUSE_MOVED, ax, ay, 0, 0)
'ボタンを押したまま移動
Call mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0)
'ボタンを解除
![その他([技術者向] コンピューター) イメージ](https://gazo.okwave.jp/okwave/spn/images/related_qa/c205_3_thumbnail_img_sm.png)
![その他([技術者向] コンピューター) イメージ](https://gazo.okwave.jp/okwave/spn/images/related_qa/c205_4_thumbnail_img_sm.png)
