タイトル : Re^2:SendInput関数について 投稿日 : 2009/09/18(Fri) 13:00 投稿者 : 靖
驚きです y = y + 10 を追加で正常に動きました。 何故かはわかりません。 思いつきでやってみました。 ------------------------------------- '縦方向 y = Form1.Top + Command1.Top + (Command1.Height \ 2) 'タイトルバーの寸法を求める y = y + (Form1.Height - Form1.ScaleHeight) - waku y = y \ Screen.TwipsPerPixelX 'スクリーン座標に変換(通常=15) 追加 y = y + 10 |