VB中滚轮滑动怎么实现呢？

第一步

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

---

第二步

      点yes,选择你解压的路径，

点击Unzip解压，

可以解压到桌面，可以看到5个文件，其中有VB6IDEMouseWheelAddin.dll这个文件

把它复制到C:/WINDOWS/SysWOW64目录下，如果你的操作系统是32位的，就复制到C:/WINDOWS/system32目录下，（操作系统的查看：右击此电脑----属性---系统类型）（现在安装一般都是64位）

---

第三步

以管理员的身份运行cmd.exe，（快捷键win+r，必须以管理员身份运行）输入 regsvr32 C:\Windows\SysWOW64\VB6IDEMouseWheelAddin.dll   （电脑64位）

32位系统则输入 regsvr32 C:\windows\system32\VB6IDEMouseWheelAddin.dll   切记32  和C    之间有 “ 空格"，输入完成之后按回车弹出注册成功窗口关闭就好。

---

第四步

      打开VB6程序，找到菜单栏的“外接程序(A)”下的“外接程序管理器(A)”,弹出【外接程序管理器】面板，在【可用外接程序】中找到“MouseWheel Fix”并选中它，在右下角的【加载行为】中勾选“在启动中加载(S)”和“加载/卸载(L)”;

---

第五步

      点击【确定】即完成设置，关闭VB6，重新启动VB6，进入代码编辑窗口，鼠标滚轮支持成功。