加载vb滚轮时出现这个问题怎么解决

VB 6.0的默认安装在编辑代码时，并不支持鼠标滚动，在编辑时带来很多不便，下面主要讲解VB 6.0鼠标滚轮解决的方法以及过程中遇到的问题。

具体步骤：

（1）下载插件。插件由微软提供：

http://download.microsoft.com/download/e/f/b/efb39198-7c59-4ace-a5c4-8f0f88e00d34/vb6mousewheel.exe

（2）下载后的vb6mousewheel.exe（下载后的文件名称就是“vb6鼠标滚轮”），进行两次解压，可以看到5个文件，其中有VB6IDEMouseWheelAddin.dll，把它复制到C:/WINDOWS/system32

然后点击开始菜单的运行，快捷键，win+R(微软图标+R），打开运行窗口，在运行窗口中输入regsvr32 vb6idemousewheeladdin.dll

（3）【注意】在第二步的过程中会遇到以下提示：模块“C:\Windows\System\VB6IDEMouseWheelAddin.dll”已加载，但是对DllRegisterServer的调用失败，错误代码OX80004005。其主要原因是相对于WINDOWS XP系统，win 7系统的安全机制更加严格，出现这样的问题是由于没有提供足够的权限，比如很多外界dll程序在win7系统中都会发生这样或那样的错误提示，还比如在安装很多软件程序的时候都必须“以管理员身份运行”才能安装成功！

（4）解决方法如下：点击【开始】-【所有程序】-【附件】，鼠标移到【命令提示符】(即cmd)，右击，然后在d出的菜单中选择【以管理员身份运行】，d出cmd的运行界面，输入：regsvr32 空格VB6IDEMouseWheelAddin.dll,点击【enter】。（本人亲测可用！）

（5）打开VB的IDE开发环境，点击【外接程序】-【外接程序管理器】-选中【MouseWheel Fix】，在【加载行为】中勾选【在启动中加载】和【加载/卸载】。

综上，win7系统中遇到各种问题不妨试一试“以管理员身份运行”，说不定就能解决很多问题，避免了浪费大量的时间在安装程序上面！

另外，对于win7 64位系统的安装，会发生如下提示，一直无法安装。解决方法如下：

（1）把VB6IDEMouseWheelAddin.dll复制在C:\Windows\SysWoW64\目录下；

（2）然后点击开始菜单的运行，快捷键，win+R(微软图标+R），打开运行窗口，在运行窗口中输入“regsvr32 C:\Windows\SysWOW64\vb6idemousewheeladdin.dll”即可，后续 *** 作如上。

VB6.0对鼠标滚轮不支持，发生此问题是因为 Visual Basic 6.0 IDE 没有对通过使用鼠标轮滚动内置支持

微软官方给出了两种方法：

方法一：

下载 VB 6 鼠标 Wheel.exe 文件， 包括加载 DLL 和代码用于创建加载项 DLL。

1.    下载 VB 6 鼠标 Wheel.exe 文件，应运行。 可用于从 Microsoft 下载中心下载下列文件： 

Download the VB6MouseWheel.EXE package now. (http://download.microsoft.com/download/e/f/b/efb39198-7c59-4ace-a5c4-8f0f88e00d34/vb6mousewheel.exe)

2.    单击 开始 ， 单击 运行 ， 键入 regsvr 32  <路径 >/VB6IDEMouseWheelAddin.dll 。(建议把VB6IDEMouseWheelAddin.dll 直接COPY到系统文件夹下，这样可以直接运行regsvr32  VB6IDEMouseWheelAddin.dll )  

3.    启动 Visual Basic 6.0。  

4.    单击"外接程序"菜单 ， 然后单击 外接程序管理器 。  

5.    在 外接程序管理器 列表, 单击 MouseWheel fix 。  

6.    在available add-ins列表中，选择“mousewheel fix”，在load behavior栏中单击选中"loaded/unloaded和load on startup复选框  

7.   单击确定，也可以生成 Visual Basic 6.0 中加载 DLL。 如果这样做, 加载 DLL 自动注册。 然后您可以按照步骤4 到 7， 加载 DLL。 以生成该加载项 DLL, 单击 文件 菜单上 生成 VB6IDEMouseWheelAddin.dll 。

方法二：

返回到 MicrosoftIntelliPoint 软件的早期版本。 要这样做, 请按照下列步骤 *** 作：

1.    如果计算机上安装 IntelliPoint 软件是版本 4.9 或更高版本, 从计算机删除 IntelliPoint 软件。  

2.    安装 IntelliPoint 4.12 软件版本。 可用于从 Microsoft 下载中心下载下列文件： 

Download the IntelliPoint 4.12 package now. (http://www.microsoft.com/downloads/details.aspx?FamilyID=4348502a-61be-4072-abe2-e3fc3aa0eee6&ampampampDisplayLang=en)

注意 您也可在大多数 VBA 环境使用此加载项。 如前所述安装加载宏， 用下列值, 创建 .reg 文件并与您注册表合并它。 

Windows 注册表编辑器 5.00 版本

HKEY_CURRENT_USER/Software/Microsoft/VBA/VBE/6.0/Addins/VB6IDEMouseWheelAddin.Connect

•    " FriendlyName " = " MouseWheel 修复 "  

•    " CommandLineSafe " = dword:00000000  

•    " LoadBehavior " = dword:00000000  

注意 如果放在 HKEY _ LOCAL _ MACHINE 它们可能会忽略这些项。

---