vb6的156种图像处理，彩色转灰图，灰图转黑白，色差转换，反白图素等。

VB6.0编写开发模块的一个例子，这个模块的解释和class1一样，大家如果看懂了class1，就懂这个模块了。这个模块只不过是class1的一个复制品，不过这里实现的是form2。OwnerInterface.RequestOperation OwnerClass, Text1.Text '和调用的对象通信，其实就是调用了他的方法而已，本来调用的应该是ICommClass的RequestOperation方法，但是因为frmtest中实现了他的方法，所以为调用frmtest中的RequestOperation，OwnerInterface.RequestOperation OwnerClass, Text1.Text 和调用的对象通信，其实就是调用了他的方法，还请注意：onconnection 不是IAddInInterface里的方法了，而是TestAddin.Class1的onconnection。 　　ICommClass.cls模块是用来通信用的，用来给调用的类实现接口用的，没有其他的用处，但是也不能少 　　Public Sub RequestOperation(pInst As IAddInInterface, Operation As String) 　　 MsgBox "执行到了这里 RequestOperation方法" '注意，因为这个方法被实现接口，所以，这里永远不会被执行 　　End Sub 　　Public Sub AddinStatusMessage(pInst As IAddInInterface, sMessage As String) 　　 Debug.Print "执行到了这里 AddinStatusMessage方法" '注意，因为这个方法被实现接口，所以，这里永远不会被执行 　　End Sub

　　VB6本身只支持16色(4位)和256色(8位)的图标，这种图标只是早期的Windows版本所采用的 图标格式标准。现在各种高清真彩色（32位带Alpha通道、24位不带Alpha通道）早已经很流行 并且普遍使用了，但在VB6中却不能直接支持、使用。即使想把这种真彩色图标加入图标资源、 或者是把它加入ImageList控件中，也会被提示“无效图片”而不能加入。记得论坛中曾经有某 位高人说过，VB6的Form是支持真彩色图标的，可以给窗体设置真彩色图标。 　　昨天上午我试了一下，新建一个标准EXE工程，然后随意找了一个高清真彩图标文件，给工 程的Form1设置Icon属性，成功了………　但是，感觉它显示的图标有点怪异，总觉得有些不对 劲呢……　于是，我把这个高清图标文件中32×32和16×16这两种规格的真彩色图标单独提取 出来，分别保存为一个.ico格式的文件，然后再用这两个图标文件来给它设置Icon属性。果然， 这两个文件在操作时VB6都提示“无效图片”！！！这就说明：VB6是不支持真彩色图标的。最 开始时“能设置成功”，只不过是因为它从图标组中找到了256色的、它能支持的格式罢了。 　　闲话不多说了，这个模块进行了简单的封装，提供了一些基础的操作功能。源码中有比较 详细的注释，使用起来应该是很简单的，就不再写什么“应用示例代码”了。首先要调用接口 函数装载图标，从图标文件加载就调用LoadFromFile()，从字节数组加载就调用LoadData()。 加载成功后，即可调用其它接口来使用图标对象了，比如用GDI方式把图标画到窗口内、或者画 到某个PictureBox上、给自己的窗口或别的程序窗口设置一个真彩色图标等。虽然在“资源” 中不能以“图标”的方式把真彩图标加入，但是，却可以按“自定义资源”的方式把图标文件 装入，使用时读取出对应的资源数据，然后调用函数LoadFromData()进行加载。加载成功就可 以使用里面的真彩色图标了。 　　这个模块只提供了一些基本的功能，如果有需要可以自己再进行扩展。还有就是没有进行 异常处理，因此要求用来加载的文件必须是正确的图标文件、并且可以读取；数组数据则必须 是合法的图标文件数据。否则可能会引起异常，你也可以修改代码进行异常捕获处理。

一般系统都没有RICHTX32.OCX这个文件的，安装了vb6精简版后也没有，而这个控件我们经常使用的，功能比vb标准的文本框控件强大多了。 使用方法： 1.下载下来解压 2.复制到系统目录，一般为c:\windows\system32 3.在vb中按CTRL+T，点击浏览，选择这个ocx文件 4.在左边控件箱中选择添加到窗体上

VB数据库编程实例，考试系统VB6.0 access

VB6编辑器 和 VBA编辑器 (Office 中的VB编辑器）都不支持鼠标滚动。但 MS 已经提供了补丁。 下载补丁后，直接双击，将其解压到某个目录，比如 D:\Program Files\VB6MouseWheel。解压后会有如下一些文件： 代码源文件： EULA.txt Main.bas VB6IDEMouseWheelAddin.vbp 生成文件： VB6IDEMouseWheelAddin.dll 注册插件文件： VBA Mouse Wheel Fix.reg 　　VB6MouseWheel 是以VB插件的方式运行的。刚才下载运行的那个安装程序并没有对其进行注册，所以现在还需要手工注册一下： 　　1. 打开“命令提示符”进入到 DOS 窗口中，进入到 VB6MouseWheel 的安装目录，运行 regsvr32.exe VB6IDEMouseWheelAddin.dll 将这个dll 注册到系统中。 　　2. 双击 VBA Mouse Wheel Fix.reg 文件，将其导入到注册表。 　　3. 打开 VB6 或者 VBA 编辑器，打开它的外接程序管理器，会看到列表里出现了“MouseWheel Fix”这一项。选择它并将其设置为“加载的”和“启动时加载”。 ok.

AmicForVB(1.1.7)最新版本 1、添加API双击就可。 2、迅速整理代码并统计工程信息。 3、支持鼠标中键。ctrl+鼠标中键水平滚动代码窗口，+shift增加滚动量与平移量，按下平移代码窗口。 4、可阵列添加控件。 5、完美支持dll输出API函数，支持Window系统下各开发语言调用。 6、扩展了VB控件全选不足。 7、强大的控件管理器，可拖放、配合ctrl容积全选 8、可生成在XP下的XP样式控件。 9、记事本功能。 10、IDE可快速切换XP样式风格 11、可自定义ams脚本。(可作为简单插件) 12、智能搜集所引用打包库 13、可插入汇编 14、“引用…”窗口中可完全看到引用文件路径 15、可加密代码 16、自动备份工程代码 17、窗体显卡 18、插件功能（可自动在服务器更新） 19、加入全屏插件、内存\窗体查看插件 20、加强查找功能 21、增加多行注释功能 22、VB.IDE错误处理，防止IDE崩溃 23、VB功能热键自定义 24、扩展代码选择编辑删除能力 25、附带[WIN32-DLL]、[Win Console]、[amicForVb's Plugin]工程模块 26、添加强制部件GUID兼容 27、添加自动代码缩进整理 等等，其它功能还待朋友们自己来发现，呵呵

自己编写的VB6.0俄罗斯方块设计（源程序&报告）；部分参考；游戏可能会有不足之处，但供学习有帮助！

主要介绍了VB6实现连接Access数据库的ADODB代码实现方法,对于初学者掌握VB链接access数据库有着很好的借鉴价值,需要的朋友可以参考下

根据鼠标位置获取句柄，类名等信息的源码（VB6）