现在您可以下载我们的代码优化者（这里下载：Code Organizer）了，以下简称CO，这是让你高效使用VB6.0 IDE的插件（Addin）。

CO分为免费版（上方下载的是免费版）和专业版（专业版淘宝购买链接）。

如果您想使用专业版请支付299美元/套（人民币2165元/套）后，我们会发送专业版给您。联系方式点击这里。

《一级菜单[C] Code Organizer [代码优化者]》

【说明】红框是代码优化者的快捷图标，可以随意拉动并记录位置的，请拉到合适位置。

【说明】如果你在“设置”（快捷菜单的齿轮图标）里面选了“简体中文”下次启动看到的界面就是（常用功能自动排版）：

打字上去的时候无需排版了，下面代码乱不乱？你还在手工打Tab键吗？No！

Private Function f_add(a As Integer, b As Integer)
f_add = a + b
                    End Function

            Private Sub Command1_Click()
                                        MsgBox f_add(3, 6), vbInformation, "成功"
End Sub

只需一点上面红色箭头的“格式化代码”小按钮，奇迹马上出现：

Private Function f_add(a As Integer, b As Integer)
    f_add = a + b
End Function

Private Sub Command1_Click()
    MsgBox f_add(3, 6), vbInformation, "成功"
End Sub

[L] Clear Inmediate Window [清空立即窗口] 

【说明】见下方图文可以一点清除立即窗口的内容，调试利器。

我们经常遇到一些问题：

没有按钮可以清除【立即】窗口，现在有了CO的橡皮擦按钮，当然在【立即】窗口也能通过鼠标看到CO的橡皮擦。

顺便说下：绿框是CO放在VB6IDE【编辑】栏目的按钮。如果你的按钮显示"$"，那么就是专业版才有的功能。

（在此绿框中只有上下查询是"$"）

[I] Insert Custom Text [插入自定义文本] 【说明】中文输入法可能需要打3次才能打出'这个注释符号，所以点击这个就能帮你打'这个符号出来，也可以自定义成其它多行文字，在设置里面可以设置。

[B] Delete Blank Lines (Current module) [删除空行（当前模块）] 【说明】在网上拷贝的代码不规范，用此功能可以删除全部空行，并且在Private和Public前面加空格，让代码美观整洁。

[1] Merge Multiple Blank Lines into 1 (Current module) [合并多个空行成1行（当前模块）] 【说明】把多个空行合并成一行，不破坏原有过程中的代码空行。

[S] Add Private Sub [添加Private Sub] 【说明】经常需要新建Sub，现在一点即可得到Private Sub s_()，并且光标停在_后面，你可以输入过程名，比如Private Sub s_chkAge()。

[F] Add Private Function [添加Private Function] 【说明】经常需要新建Function，现在一点即可得到Private Function f_()，并且光标停在_后面，你可以输入过程名，比如Private Function f_chkAge()。

[C] Comment Block [注释掉行] 【说明】可以批量将注释符号'放在代码前面一格，适合缩进。而不像IDE在行第一个位置，那样在缩进代码的时候会非常难看。

[U] Uncomment Block [解除注释] 【说明】可以批量解除注释块。

$[T] Find Words to Previous [向上查找] 【说明】经常需要向上搜索变量或其它文字，用此功能太方便了。

$[W] Find Words to All [查找所有] 【说明】向下搜索。

$[A] VB Code to .asp file (Current module) [VB代码到.asp文件（当前模块）]【说明】在当前模块进行编辑排版和缩进好代码后保存到同名的.asp文件中。

记得由于权限问题，先要有同名.asp文件才能保存成功。比如我们可以新建模块index，然后保存，就会生成index.asp。

如果老的index.asp文件被CO修改，用VS2022或Sublime等软件就会提示是否加载最新版本，选【是】即可。

CO会自动加入'<%和'%>，可以删除。

$[R] Restore VB Code from .asp file (Current module) [.asp文件恢复成VB代码（当前模块）]【说明】利用此功能可以把同名的.asp文件中的代码放到当前模块进行编辑排版和缩进。对于'<%和'%>会自动删除。

$[N] Delete Spaces Before and After (Current module) [删除前后空格（当前模块）]【说明】对于asp文件来说，放服务器建议去掉前后空格，这样不影响代码，也大大减少了asp文件的体积。比如变成：

Sub f_s(strShow)
response.write strShow
response.End
End Sub
a = 1
b = 2
If a ＞ b Then
f_s (a)
Else
f_s (b)
End If

[D] Indent Procedure [格式化过程]【说明】美化代码，便于理解。

[M] Indent Module [格式化模块]【说明】特别有用，放在了VB6IDE的编辑栏中了。

[P] Indent Project [格式化工程]【说明】批量把整个工程都进行美化。

[E] Exit [退出]【说明】退出本插件。

《二级菜单[O] Others》 [其它]

[A] About Code Organizerer and Register [关于代码优化者和注册]【说明】可以看到我们的网址和注册按钮，专业版还能看到剩余次数并注册。

[S] Set Up [设置]【说明】设置缩进和一些快捷键，比如F1=Shift+F8，这样可以只按F1键就能一行行不进入子程序地调试VB6代码了，十分有用。

设置了3个快捷键可以自动填充代码到当前光标，提高了测试效率。

中文版是：

按钮“IDE颜色风格”可以将难看的VB6IDE颜色风格变成好看的暗黑风格。

点击保存后会弹出CoLib样色的窗口，这时需要关闭全部VB6IDE，然后再点击“运行”按钮，接着“退出”即可在下次打开VB6IDE的时候看到漂亮的暗黑风格，当然也能恢复到VB6IDE的默认风格。

[E] Chinese Symbol to English (Current module) [中文符号变英文符号（当前模块）]【说明】网上很多代码包括AI给出的代码都是用的中文符号，运行不了，需要用此功能批量修改成英文才能运行。

[R] Private to Public (Current module) [全部Private变Public（当前模块）]【说明】批量替换。

[P] Public to Private (Current module) [全部Public变Private（当前模块）]【说明】批量替换。

$[N] Add Line Number (Current module)  [添加行号（当前模块）]【说明】如果生成的exe有问题，可以用行号配合提示代码得到出错行和Err.Number，是调试的利器。

看下专业版的行号功能，找出exe的出错行。

$[D] Delete Line Number (Current module) [删除行号（当前模块）]【说明】批量删除行号和Err.Number。

[-] Fold Current Procedure ^- [折叠当前过程]【说明】如果上方代码占地方了，可以用折叠功能。

[+] Unfold Current Procedure ^+ [展开当前过程]【说明】恢复折叠的代码，不会有垃圾注释出现。

[*] Unfold All of Current module ^* [展开所有折叠（当前模块）]【说明】恢复全部折叠代码。

$[F] Add Professional f_chkPro [添加专业版f_chkPro代码]【说明】对于需要专业版才有的功能，可以用此判断得到True或False。见下方红框。

$[L] Add Professional Label [添加专业两头标签]【说明】插入专业两头标签，标签中的代码是专业版才有的功能。见上方绿框。

$[B] Comment Code between Professional Label (Project) [注释掉专业版两头标签中的代码（当前工程）]【说明】生成免费版exe或dll前，用此功能可以注释掉专业版两头标签中的代码，以免被破解，毕竟连代码都没打包到exe和dll中。免费版和专业版是一套系统，这样对于升级来说只用修改一个代码即可，不用分很多版本，这才是最方便的。见下方蓝框。

$[U] Uncomment Professional Code (Project) [去除专业版两头标签中的代码的注释（当前工程）]【说明】去除两头标签的注释，变成正常专业版代码。

[&M] Add-Ins Manager [外接程序管理器]【说明】如果你要打卡很多VB6程序，过多的插件会影响IDE启动速度，可以只保留CO的插件作为启动项，其它插件在需要的时候再临时加载。

[&R] Clear the immediate window before running[清除立即窗口后再运行]【说明】没有一个插件像CO的红色运行按钮那么好用。

我们时常通过Debug.Print打印一些状态，但是上次运行结果影响我们观察，现在用这个功能，就能先清除立即窗口再运行。

[&P] Comment all Lines starting with Debug.Print [注释掉全部 Debug.Print 开头的行（当前模块）]【说明】可以批量操作。

[&U] Uncomment all Lines starting with Debug.Print (Current module) [恢复全部 Debug.Print 开头的行（当前模块）]【说明】可以批量操作。

[&L] Delete all Lines starting with Debug.Print (Current module) [删除全部 Debug.Print 开头的行（当前模块）]【说明】可以批量操作。

[&O] Combine all Lines (Current module) [组合全部线条（当前模块）]【说明】对于多行API等以 _ 这行的代码，可以合并成一行，如下图：

[&T] TabInde Assistant [TabInde助手]【说明】对当前窗体中的控件按Top和Left的坐标排序，避免按Tab键乱跳。

【安装方法】

1、下载代码优化者（Code Organizer），解压到C:\vb6ide_dll，会有7个文件：

CodeOrganizer.dll 'VB6的AddIn插件文件
COLib.exe '配合上方文件的库文件，可以给VB6IDE换暗黑风格
Register-CO.bat '注册DLL
Unregister-CO.bat '卸载DLL
Cmd-Ok.bat '【备用而已】打开命令行窗口的命令，实际上就3个字cmd，支持鼠标右键用“以管理员方式运行”
Consola.ttf '【备用而已】漂亮的英文字体，建议双击此字体，点击“安装”按钮
MSCOMCTL.OCX '【备用而已】微软的Microsoft Windows Common Controls 6.0 (SP6)，如果缺控件可以注册这个控件

2、当然也可以用管理员方式双击 Register-CO.bat 或运行命令框，进入C:\vb6ide_dll 去注册这个dll文件，输入命令：

cd C:\vb6ide_dll
regsvr32 CodeOrganizer.dll

打开VB6 IDE，菜单栏“外接程序”->“外接程序管理器”。打开后会看到CodeOrganizer已经打勾了前两项。

这样你的代码界面就能使用鼠标右键使用Code Organizer了。

【如何升级】

如果你有老版本的Code Organizer安装在C:\vb6idc_dll，那么请用最新的CodeOrganizer.dll和COLib.exe覆盖老版本，然后按上方2的方式注册即可。

【更新记录】

ver4.1，对合并多个空行成1行的功能优化了，更适合网上下载的有多余空行的代码。

ver4.0，对控件增加了自动排序TabIndex的功能。

ver3.8,  删除空行时，增加了对没有Private/Public的Sub和Function的前面添加空行的功能。

ver3.7,  在IDE命令栏增加了2个功能的快捷方式。

ver3.6,  增加了合并组合拆分行的功能，对多行API可以快速合并到一行。增加了给VB6IDE换暗黑风格和字体的功能，十分有用。

ver3.5，增加了对Debug.Print开头的行的批量操作，批量注释、恢复、删除。

ver3.4，增加到3个自定义热键Ctrl+I(插入'),Ctrl+D(插入Debug.Print ""),Ctrl+P(插入按钮代码)。

ver3.3，修复了生成exe和dll弹出的91With提示。

ver3.2，快捷图标新功能清除立即窗口后再运行，直接打开外接程序管理器。

ver3.1，快捷图标对折叠代码精确控制，取消了热键。

ver3.0，放置了拖动的快捷图标。

ver3.0，支持鼠标滚轮功能对反复打勾或去勾的支持。

ver2.9，特别增加了支持VB6IDE代码窗口鼠标滚轮的功能，这样避免再去安装其它插件了。

ver2.8，英文版变中英文双语版。

...