本文可帮助你解决无法使用鼠标滚轮在 Visual Basic 6.0 IDE 中滚动的问题。
原始产品版本： Visual Basic
原始 KB 编号： 837910
现象
不能在 Microsoft Visual Basic 6.0 IDE 中使用鼠标滚轮滚动。
原因
出现此问题的原因是 Visual Basic 6.0 IDE 没有使用鼠标滚轮滚动的内置支持。
解决方法
若要解决此问题，请使用以下方法之一：
方法 1
下载包含加载项 DLL 和用于创建加载项 DLL 代码的 VB6 Mouse Wheel.exe 文件。
- 下载 VB6 鼠标滚轮 .exe 文件。
- 依次单击开始，单击运行，键入
regsvr32 <path>\VB6IDEMouseWheelAddin.dll，然后单击确定。 - 启动 Visual Basic 6.0。
- 单击 “加载项”，然后单击“ 外接程序管理器”。
- 在 “加载项管理器 ”列表中，单击“ MouseWheel 修复”。
- 单击以选中 “已加载/已卸载 ”复选框，然后单击以选中“ 启动时 加载”复选框。
- 单击“确定”。
还可以在 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：00000000
注意
如果将这些键置于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_MOUSEWHEEL转换为 WM_SCROLL 。 IntelliPoint 软件版本 4.9 及更高版本没有此功能。 因此，如果要使用鼠标滚轮在 Visual Basic 6.0 IDE 中滚动，则必须使用 IntelliPoint 软件版本 4.12。
参考
关于WM_MOUSEWHEEL通知的更多信息，请参阅WM_MOUSEWHEEL 消息。
病毒扫描声明
Microsoft扫描此文件以查找病毒，使用发布文件日期可用的最新病毒检测软件。 该文件存储在安全性得到增强的服务器上，以防止在未经授权的情况下对其进行更改。