分享好友 编程语言首页 频道列表

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

VisualBasic  2023-02-08 21:280

VB6毕竟是很老的产品了,它的代码编辑器垂直滚动条并不能随鼠标的滚轮而滚动,这个问题会让我们在编写代码的时候觉得很不方便,不过还是有一种方法可以解决这个问题的。

先下载一个微软发布的“VB6IDEMouseWheelAddin.dll”文件(此文件已经上传到百度网盘,网址:http://pan.baidu.com/s/1c06KY7e,或者也可以自己百度一下该文件名下载),然后按照以下的方法进行(注意:此处介绍的是一种通用的方法,适合是32位和64位的系统上使用):

一、将下载的文件解压以后,取出里面的“VB6IDEMouseWheelAddin.dll”文件,将此文件放在一个不容易被删除的文件夹里面(注:此文件千万不能删除,否则就没有用了),比如此处是放在C盘的windows文件夹下:

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

 

二:此处要分开处理了

如果你的电脑上是Windows 7或者XP系统,在开始菜单的“运行”里面输入“regsvr32 c:\Windows\VB6IDEMouseWheelAddin.dll” (注意:此处regsvr32后面有一个空格,且后面是之前放入的那个文件的完整路径,如果也是放在C盘的windows文件夹里面的,则那个路径可以直接复制粘贴,反之的话,需要修改为自己放入那个文件的完整路径),然后回车:

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

然后就提示注册成功:

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

 

如果你的电脑是Windows 8(8.1)或者是Windows 10系统,因为这三者系统对权限的要求比较苛刻,操作系统的用户通常都不是管理员,所以需要这样处理才可以(此处以Windows 10系统为例):

找到开始菜单里面的“Windows系统”,然后右键点击里面的“命令提示符”,选择“更多”——“以管理员身份运行”(注:这里不同的Windows系统版本可能有一些出入,反正要选择“以管理员身份运行”)就可以了,如图所示: 

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

然后在打开的“管理员:命令提示符”窗体内,复制粘贴以下内容(如果不能使用快捷键粘贴的话,试试看鼠标右键点击就可以粘贴了,实在不能复制粘贴的话,只能手动输入了,注意不要输入错误了):regsvr32 c:\Windows\VB6IDEMouseWheelAddin.dll(注意:此处regsvr32后面有一个空格,且后面是之前放入的那个文件的完整路径,如果也是放在C盘的windows文件夹里面的,反之的话,需要修改为自己放入那个文件的完整路径),如图所示: 

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

然后按回车,得到提示注册成功:

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

 

三、然后打开vb6开发环境(随便打开一个都可以), 点击菜单“外接程序”——“外接程序管理器”:

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

 

四、然后在外接程序管理器窗体当中,选择“MouseWheel Fix”这一项,然后在右下方“加载行为”那里打钩“在启动中加载”和“加载/卸载”两项,然后点击确定就可以了,这样使用VB6.0开发的软件的代码编辑器垂直滚动条都可以随鼠标滚轮而滚动了(不需要重启VB6.0都可以):

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

 

注意事项:如果你的电脑操作系统是Windows 8(8.1)或者是Windows 10,在注册上面所述的那个dll文件的时候如果遇到出错的情况,建议先仔细检查一下注册的时候输入的字符串是否正确了,然后问题依旧的话,建议把那个文件放在除了C盘的其它盘上,或者是放在C盘里面的WindowsSysWOW64文件夹当中(如图所示),然后注册的时候再输入对应的完整地址即可,因为按照以往的经验,Windows 8(8.1)或者是Windows 10系统对C盘的安全管理比较严格,有的时候放在C盘(包括桌面上)的文件都不能正常的读取或者写入操作,如果遇到这种情况了,不妨换一个除了C盘之外的其它盘看看吧,或许这样就成功了另外:有的时候盘符也需要区分大小写的,例如大写的C和小写的c的区别,如果确定了路径都正确,且不是权限的问题的话,不妨试试看将字符串当中的盘符大小写换一下看看吧,或许这样就成功了) 。

如何让VB6代码编辑器垂直滚动条随鼠标滚轮滚动

 

原创性声明:
此文章实属原创,目前仅在本站和瑞文软件的官方网站(地址:https://www.rwrjhao.com/details?article_id=39)发布,请转载的朋友一定要注明本网站本文章的地址或是“瑞文软件”的字样,否则一律按侵权处理,谢谢合作

查看更多关于【VisualBasic】的文章

展开全文
相关推荐
反对 0
举报 0
评论 0
图文资讯
热门推荐
优选好物
更多热点专题
更多推荐文章
Windows API Reference for C#, VB.NET
不错的.net 下用API的参考站点地址在:http://www.webtropy.com/articles/Win32-API-DllImport-art9.asp 下面摘抄分类,便于大家直接就拿来用: File, Memory, Process, Threading, Time, Console, and Comm control(kernel32.dll) _hread_hwrite_lclose_lcr

0评论2023-03-16877

一个基于API的VB.net串口通讯类 vbnet串口通信如何编写
VB.net的串口通讯支持总是让人觉得有所不足,在使用VB6的MsComm32.ocx时,很多人都会在VB.net的开发中觉得很困扰。    这里讲述的VB.net串口通讯类使用native代码,并且它是通API调用实现的,你会发现VB.net的串口通讯就是这么简单。    在说明如何使

0评论2023-02-12420

[VB][ASP.NET]FileUpload控件「批次上传 / 多档案同时上传」的范例
FileUpload控件「批次上传 / 多档案同时上传」的范例 (VB语法) http://www.dotblogs.com.tw/mis2000lab/archive/2008/05/14/3986.aspx    FileUpload控件真的简单好用,不使用它来作批次上传,却要改用别的方法,实在不聪明。要用就一次用到底,公开File

0评论2023-02-10976

第八章 VB中ActiveX控件的使用
轉自:http://wwww.hyit.edu.cn/edu/vb/study/index.htm第八章          VB中ActiveX控件的使用8.1  概述     这里的ActiveX控件是指VB标准工具箱里没有的控件,用时需从“工程”菜单里选择“部件…”(或右键单击工具箱,从快捷菜单中选择“部

0评论2023-02-10615

第二章 VB的界面设计
轉自:http://wwww.hyit.edu.cn/edu/vb/study/index.htm第二章         VB的界面设计2.1  VB用户界面设计基础1. 概述   界面的设计有两步:先绘制控件,然后确定控件属性。   绘制控件:在工具箱里单击想画的控件,在窗体里按下鼠标并拖曳,然后

0评论2023-02-10497

VB6多线程,关键段操作 vb6.0 多线程
Option Explicit Declare Function GetLastError Lib "kernel32" () As Long 'Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long 'Declare Sub ExitThread Lib "kernel32" (Optional ByVal dwExitCode

0评论2023-02-09486

VB.NET调用IE,并且等待
            Dim p As New Process            '获得URL            aURL = GetURL()            '获得IE路径            p.StartInfo.FileName = System.Environment.GetFolderPath( _ 

0评论2023-02-09939

vb的VSFlexGrid控件 vb msflexgrid
多行选中VSFlexGrid的SelectionMode = flexSelectionListBox,现在可以配合Ctrl进行多行选择循环取值用vsflexgrid.SelectedRows 可以得到你选择的行的总数量然后用循环可以得到具体的行中具体列的内容Dim Temp  As StringDim i As IntegerFor i =

0评论2023-02-09868

转载-公历转换农历VB示例 公历转农历函数
Option ExplicitPrivate LunarInfo(1 To 150) As Double '从1900-2049年这150年的农历信息码Private SolarMonth(1 To 12) As Integer '阳历12个月的天数Private Gan(1 To 10) As String '农历的天干Private Zhi(1 To 12) As String '农历的地支Private Animal

0评论2023-02-09982

[转] VB的Ping 模块
图:Ping通的情况图:Ping失败的情况下面是源代码(VB6):(完善的出错控制,所以是个好函数)Option ExplicitPrivate Const IP_SUCCESS As Long = 0Private Const IP_STATUS_BASE As Long = 11000Private Const IP_BUF_TOO_SMALL As Long = (11000 + 1)Private

0评论2023-02-09407

VB.NET withevent 自定义事件处理
Module Module1    Private WithEvents aemp As part2    Sub Main()        Dim chen As New part2("chen lili", 20000)        aemp = chen        Console.WriteLine(chen.Name" prevouis salary is "chen.Salary)      

0评论2023-02-09571

VB6操作ACCESS文件 vb+access
VB6操作ACCESS文件Option ExplicitConst Dict_DB = "adatabase.mdb"'先要引用Microsoft ActiveX Data Objects 2.8 LibraryPublic cnn As ADODB.ConnectionPublic rst As ADODB.Recordset, rst2 As ADODB.RecordsetPublic cmd As ADODB.CommandPrivate Sub For

0评论2023-02-09762

VB用API实现各种对话框(总结) vbs简单代码对话框
VB用API实现各种对话框(总结)  各种对话框(总结)标准对话框(SmDialog)Option Explicit''定义一个全局变量,用于保存字体的各种属性Public Type SmFontAttrFontName As String '字体名FontSize As Integer '字体大小FontBod As Boolean '是否黑体FontItalic A

0评论2023-02-09401

VB中的正则表达式 vb 正则表达式
RegExp对象提供简单的正则表达式支持功能。  RegExp对象的用法:Function RegExpTest(patrn, strng)Dim regEx, Match, Matches ' 建立变量。Set regEx = New RegExp ' 建立正则表达式。regEx.Pattern = patrn ' 设置模式。regEx.IgnoreCase = True ' 设置是

0评论2023-02-09890

VB 调用水晶报表2
Set rptApp = New CRPEAuto.ApplicationrptApp.LogOnServer "PDSODBC.DLL", "sbd", "sbd", "epm", "epmis"Set rpt = rptApp.OpenReport(App.Path"\\计划管理\\月度保养计划.rpt")rpt.SQLQueryString = strSQL \'strS

0评论2023-02-09631

【VB】StrConv函数 vbUnicode用法
【VB】StrConv函数StrConv(string, conversion, LCID)vbUnicode64根据系统的缺省码页将字符串转成Unicode。vbFromUnicode128将字符串由 Unicode 转成系统的缺省码页。    Windows系统对字符采用了DBCS编码,它是一套单字节和双字节的混合编码,即西文与AS

0评论2023-02-09999

更多推荐