Visual Basic 6.0 IDE でマウス ホイール イベントが機能しない
この記事は、Visual Basic 6.0 IDE でマウス ホイールを使用してスクロールできない問題を回避するのに役立ちます。
元の製品バージョン: Visual Basic
元の KB 番号: 837910
現象
Microsoft Visual Basic 6.0 IDE でマウス ホイールを使用してスクロールすることはできません。
原因
この問題は、Visual Basic 6.0 IDE にマウス ホイールを使用したスクロールのサポートが組み込まれていないことが原因で発生します。
回避策
この問題を回避するには、次のいずれかの方法を使用します。
方法 1
アドイン DLL とアドイン DLL の作成に使用されるコードを含む VB6 マウス Wheel.exe ファイルをダウンロードします。
- VB6 マウス Wheel.exe ファイルをダウンロードします。
- [スタート] ボタンをクリックし、[実行] をクリックして、「OK」と入力
regsvr32 <path>\VB6IDEMouseWheelAddin.dll
します。 - Visual Basic 6.0 を開始します。
- [ アドイン] をクリックし、[ アドイン マネージャー] をクリックします。
- アドイン マネージャーの一覧 で 、 MouseWheel 修正をクリックします。
- [ 読み込み/アンロード ] チェック ボックスをオンにし、クリックして [起動時に読み込み ] チェック ボックスをオンにします。
- [OK] をクリックします。
Visual Basic 6.0 でアドイン DLL をビルドすることもできます。 これを行うと、アドイン DLL が自動的に登録されます。 その後、手順 4 ~ 7 に従ってアドイン DLL を有効にすることができます。 アドイン DLL をビルドするには、[ファイル] メニューの [VB6IDEMouseWheelAddin.dllを作成する] をクリックします。
注:
このアドインは、ほとんどの VBA 環境でも使用できます。 前述のようにアドインをインストールし、次の値を持つ .reg ファイルを作成し、レジストリにマージします。
Windows レジストリ エディター バージョン 5.00
HKEY_CURRENT_USER\Software\Microsoft\VBA\VBE\6.0\Addins\VB6IDEMouseWheelAddin.Connect
- "FriendlyName"="MouseWheel Fix"
- "CommandLineSafe"=dword:000000000
- "LoadBehavior"=dword:000000000
注:
これらのキーを下 HKEY_LOCAL_MACHINE
に配置すると、これらのキーは無視される場合があります。
方法 2
以前のバージョンの Microsoft IntelliPoint ソフトウェアに戻ります。 これを行うには、次の手順を実行します。
- コンピューターにインストールされている IntelliPoint ソフトウェアがバージョン 4.9 以降の場合は、コンピューターから IntelliPoint ソフトウェアを削除します。
- IntelliPoint ソフトウェア バージョン 4.12 をインストールします。
詳細情報
Visual Basic 6.0 でのマウス ホイールのサポートは、マウス ドライバーの機能です。 WM_MOUSEWHEEL
マウス ホイールを回転すると、フォーカス ウィンドウにメッセージが送信されます。 Visual Basic 6.0 IDE には、マウス ホイールを使用したスクロールのサポートが組み込まれていないため、IDE はメッセージを WM_MOUSEWHEEL
無視します。 ただし、IntelliPoint ソフトウェア バージョン 4.12 では、マウス ホイールがサポートされ、メッセージWM_SCROLL
が WM_MOUSEWHEEL
. IntelliPoint ソフトウェア バージョン 4.9 以降のバージョンには、この機能はありません。 そのため、マウス ホイールを使用して Visual Basic 6.0 IDE でスクロールする場合は、IntelliPoint ソフトウェア バージョン 4.12 を使用する必要があります。
関連情報
通知の詳細 WM_MOUSEWHEEL
については、「 WM_MOUSEWHEEL メッセージ」を参照してください。
ウイルス スキャン要求
Microsoft は、ファイルが投稿された日付に使用可能な最新のウイルス検出ソフトウェアを使用して、このファイルをスキャンしてウイルスを検出しました。 ファイルは、セキュリティ強化されたサーバーに保存され、不正な変更を防ぎます。
フィードバック
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:フィードバックの送信と表示