手把手教你编写VB小程序,以后可能会用的到哦!

友情提醒:

因为VB6.0是比较老的软件了,为了完美兼容,建议

尽量使用XP 和 win7 32位的系统。

xp与vb的兼容性是最完美匹配的。

win7 64位和win10 已测也是可以正常打开运行。

特别说明 :

以下所有源代码在win7 64位 和 win10 64位下,打开VB程序均可运行成功。如果想在win10系统下编写程序,请先安装VB6.0 企业版,软件可以进群下载,如何安装可观看老师另外给大家录制的VB6.0在win10下安装企业版的视频,连接数据库时win10会遇到找不到OLE DB提供的access 4.0程序,可参照第一个和第六个程序,不用UDL 直接用代码连接数据库。数据库如果不是2003版本 是2010以上的可以直接从老师提供的文件里拷贝一个mdb的access2003 即可,无需再安装2010高级版本。

Rs.ActiveConnection = "file name=manage.udl"

修改为

rs.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Test.mdb"

cn.ConnectionString = "file name=manage.udl"

修改为

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Test.mdb"

---------------------------------

如果坚持想要用2010版本以上的access,可以使用以下语句

rs.ActiveConnection = "provider=microsoft.ace.oledb.12.0;data source=Test.accdb"

cn.ConnectionString = "provider=microsoft.ace.oledb.12.0;data source=Test.accdb"

--------------------------------

一、抽奖软件

(有源代码)

适用范围:活动抽奖、随机出题、俩俩PK抽签等等。

所用软件:VB6.0和office中的access【推荐用2003】

功能:

1、将所有人员名单存放在access中,输入人数,可以随机抽出互不重复人员姓名。已被抽中人员不再被抽中。

2、也可以设置一个或者多人不会被抽中,但是在滚动屏幕里可以看见名字。

3、也可以设置可以被抽中多次。

4、开始抽奖时,有音乐响起,音乐可以视个人爱好更换。每次抽奖时可以有不同音乐。

5、可以打包生成可执行文件,没有安装VB和Office的电脑也可以运行。

6、将抽中的人员姓名备份在记事本里。

7、有重置功能,可以重复使用。

非常简单,稍微有一点VB基础最多花费半天时间即可做完。

二、准点报时

(有源代码)

适用范围:准点播放广告电影;学校、企业、工厂准点报时等等。

所用软件:VB6.0 、格式工厂

功能:

采用windows自带的播放器,根据设置的时间,到点自动播放电影(wmv格式等windows兼容格式)、音乐(mp3格式)。

非常简单,稍微有一点VB基础最多花费20分钟即可做完。

三、简单管理系统

(有源代码)

用VB6.0制作的界面,对数据库进行查询数据、增加数据、修改数据、删除数据,从而可以做出简单的数据管理系统。

所需软件:VB6.0、Access2003

vb6远程mysql vb6连接mysql数据库_数据

vb6远程mysql vb6连接mysql数据库_数据_02

功能:

1.登录界面,输入正确的帐号和密码,进入系统;如输入错误,给出来提示

2.进入系统后,将数据库里的数据直接显示在界面的表格框里。

3.输入姓名或者其他字段,查询出内容并显示在界面上。

4.根据日期区间查询所需内容,并显示在界面上

5.可以一条一条浏览数据

6.双击表格,可以将数据显示在文本框中,然后可以修改、删除、新增数据记录。

四、VB程序进行Excel数据导入、导出

(有源代码)

所用软件:VB6.0、Excel2003、access2003【与VB兼容性最好】

功能:1、VB窗体界面打印

2、Excel数据批量导入数据库

3、所有数据导出Excel

4、根据条件查询出来的数据导出到Excel

5、文本框里的多行多列的数据导入到Excel

五、VB6.0制作自定义控件(无源代码)

有的时候,多个控件和控件事情需要在多个窗体里运用很多次,为了提高效率,我们可以创建用户自定义控件。当我们从其他地方看到一个很好的用户控件,我们也可以拷贝和添加到自己的VB工程里运用。

六、VB6.0利用MD5加密保存在数据库里的数据,即使打开数据库里面的表,也无法知道数据内容。

(有源代码)

1、VB连接有密码的数据库

2、将密码进行加密,在数据库看不到真实的密码

vb6远程mysql vb6连接mysql数据库_数据库_03

3、实现登录功能

vb6远程mysql vb6连接mysql数据库_数据库_04

4、实现注册新用户功能,已注册用户不能重复注册

vb6远程mysql vb6连接mysql数据库_vb6远程mysql_05

5、实现密码修改功能,必须要知道原密码。

vb6远程mysql vb6连接mysql数据库_vb6远程mysql_06