飞鸽传书VB源码，需要的朋友可以参考参考，个人觉得还不错，为初学者准备的好东西啊

使用必读： (1)本系统的数据库为SQL Server 2000，在运行程序前需安装SQL Server 2000。（数据库用户名为sa，密码为空） (2)将本系统拷到机器硬盘上，去除只读属性。双击“生产管理系统\Program\窗体\生产管理系统.exe”即可运行本程序并自动附加数据库，无需用户手动配置。首次运行由于系统自动连接数据库，启动时间可能会长，但也随机器的配置不同而不同。 (3)在使用本系统的第二套、第三套、第四套、第五套程序时，由于其没有数据库文件，须首先运行生产管理系统文件夹中的程序，利用其自动附加的数据库，才可运行第二套、第三套、第四套、第五套程序。 (4)第二套、第三套、第四套、第五套程序中没有可执行文件和帮助文件，读者可利用本书介绍的方法，自己设计实现。用户在工程中运行程序时，如出现图1所示的错误，单击“确定”按钮，弹出“引用”对话框，如图2所示。 产生这种错误的原因是因为系统安装的Word版本不同产生的，用户在工程中运行程序时，应根据本机上安装的Word版本引用不同的对象。如果用户本机为Word2000版本，采用以下方法解决此问题： 取消对“Microsoft Word 11.0 Object Library”的引用，并勾选“Microsoft Word 9.0 Object Library”项，如图3所示，单击“确定”按钮即可。

VB根据PID得到进程路径，改了一段代码，可以获取进程的PID和路径： 　　在窗体设计器里放一个listbox，命名为process； 　　再放2个txtbox，一个名为ProcessID，用来显示PID； 　　另一个名为Path，用来显示进程路径； 　　最后再放一个按钮，命名为cmdRefresh，用于刷新列表； 　　完成后即可运行代码

VB6验证码识别的例子，识别百度的验证码，Public Sub FenGe(ByVal n As Integer) 函数把第n个图片拷贝到数据b中，Public Sub QuBian() 函数去掉边缘部分的黑点，这里左右各去掉1列，上下各去掉3行。Public Sub SuanTag() 扫描纪录黑点的8个邻居的情况。Public Sub QuQiao1() 去掉下卷的干扰，主要为提高识别2的准确性，Public Sub QuQiao2() 去掉上下翘起的干扰，主要为了识别3。Public Function is8() As Boolean 用横条来识别8，8中至少有长度为3的横条3个，5也有可能有，但是5在前面，已经识别。9也可能有，所以要把先识别9。

vb漂亮的进度条例程源码，不多说了吧，都懂的

VB6.0+Access自制的通讯录，有工程源文件和源码，无任何密码，供大家一起学习，共同进步。

一个相当不错的VB音频波形分析程序源码，支持的功能有：播放音频、对音频进行采样分析，支持多声道采集，显示频谱图等。

VB6 利用ToolBar控件制作简单工具栏的源码，例子很简单，代码量也超少，主要早使用了一个控件来实现工具栏，包括工具栏上的按钮和菜单，如示例截图所示，是VB新手参考的范例。

内容索引:VB源码,文件操作,源代码　　VB编写程序实现VB源码转换为Delphi源码，这是一个老外程序，可以顺利编译，具体转换效果怎么样，请大家自己测试。

循环查找文本中所有指定的一个字符串 VB源码