给VB增加一个滚轮，让VB编代码的时候更方便
VB6IDEMouseWheelAddin.dll
就是这个能使你在VB的代码编辑窗口能够使用鼠标滚轮，编辑代码、查看代码更方便。
下面详述：
1、给大家一个下载地址：
http://download.microsoft.com/download/e/f/b/efb39198-7c59-4ace-a5c4-8f0f88e00d34/vb6mousewheel.exe右击解压，再右击解压，这时就会看到一个dll文件，这个就是我们要的dll文件。
如果你觉得麻烦的话可以直接下载这个dll文件：http://www.leszj.com/sfw/VB6IDEMouseWheelAddin.dll
2、打开我的电脑→Windows→System32文件夹。将这个dll文件复制粘贴过去。
3、将这个dll文件注册。方法为：点击开始→运行，输入“regsvr32 ***.dll”（引号不用输入），将***换成这个dll的文件名，也就是VB6IDEMouseWheelAddin，即regsvr32 VB6IDEMouseWheelAddin.dll。点击确定，这样就完成了注册。
4、如果你现在正打开一个VB编辑器，把它保存一下关掉。重新打开VB，这样他才能重新加载新加入的dll文件。菜单“外接程序”→“外接程序管理器”里，选中MouseWheel Fix，在加载行为里选中“在启动中加载”和“加载/卸载”两项，点击确定就加载了。
5、再次关闭这个VB编辑器。再次打开VB编辑器。看看是不是可以用滚轮了？！
相关文档：
将长路径转为短路径
Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
Private Function ShortPath(ByVal FileName As String) As String
Dim S As String
On Error GoTo exitFu ......
Asc 函数
返回一个 Integer，代表字符串中首字母的字符代码。
语法:
Asc(string)
必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符，则会产生运行时错误。
说明:在非 DBCS 系统下，返回值范围为 0 – 255 。在 DBCS 系统下，则为 -32768 &ndas ......
·创建具有很强内聚力的模块
·创建更加容易调试和维护的过程
·创建高度专用的过程
·创建松散连接的过程
·尽量使过程具有独立性
·提高过程的扇入性
·降低过程的扇出性
·编程原则
·为过程和模块赋予表义性强的名字
&middo ......
◆请由此确定是否被恶意修改◆
作者：我心飞翔
VB中引入本DLL的方法
方法一：选择“工程(P)”菜单下的“引用(N)”，在出现的对话框中点“浏览按钮”，并找到DLL所在位置。
方法二：分两步走
(1)注册动态链接库，使用regsvr32命令。在运行对话框中，输入“regsvr32 DLL完整路 ......
