vb6.0+mysql

魂断蓝桥

算来，从注册到如今，已经3个年头了，在这里得到了很多的帮助，也学到了许多知识，我会用几周的时间，把这个帖子编辑下去，算是对论坛的支持及对自己这几年来的一个总结吧，学习的时间不长，代码中的错误，肯定不会少，也请大家一并指出，共同提高。

主要用vb6.0做前台，后台的数据库选择mysql，用到的主要控件，LISTVIEW,COMBO,LIST等，选mysql 的主要原因是，mysql是服务器+客户端，用法也比较简单，如果用access 需要开启共享，安全性不如mysql，并且access不支持事物，不支持行级别的锁定，用户、数据一多，性能不如mysql。

vb做前台的好处是，对权限可以比较好的控制，而且不会产生，禁用宏的隐患，并且，vba的代码90%在vb中是通用的，不会太复杂。

首先介绍一下用的软件，大家可以在网上直接下载，我就不上传了。

1、mysql-5.5.37-win32.msi
2、mysql驱动程序_mysql-connector-odbc-5.1.6-win32.msi
3、Navicat_for_MySQL_10.1.7.exe
4、VB6.0企业版。

下载后，自行安装就可以了，具体步骤网上有很多教程，注意一点安装mysql的时候，选择（严格模式），数据库类型选第一个，也就是开发者类型，占用资源比较少，如果有服务器的话，可以选第二个，数据库用途那里，我选的是第二个，也就是主要资源配置给innodb引擎。

完成后的程序如下所示。

魂断蓝桥

启动navicat软件后，新建数据库，名字是jjd
再新建几张数据表，关系，字段设置及外键设置如下。

魂断蓝桥

vb6.0 部件选择控件包括



vb6 代码如下

jjd.rar (845.92 KB, 下载次数: 343)

2014-7-1 11:08 上传

点击文件名下载附件

songzi2000

这个作品含量太高了，分享快乐，非常的赞一个，向蓝桥老师学习

沈天一

努力 学习  谢谢分享

suixin0529

顶一下，顺便请问楼主，能不能给个VB6.0的下载地址，网上下了两个都提示有病毒，没敢用

linxubin2007

努力 学习  谢谢分享

Jane9

努力学习，谢谢分享

lijunwei2013

真的很不错，先收藏了，慢慢学习

sannige

追寻大神的脚步，我安装了xp的虚拟机，并且安装了
1、mysql-5.5.37-win32.msi
2、mysql驱动程序_mysql-connector-odbc-5.1.6-win32.msi
3、Navicat_for_MySQL_10.1.7.exe
4、VB6.0企业版。
其中123的版本和楼主的稍有区别，建了数据库，建了表，设好了外键，找到了总表中航次id数据类型和航次表中的航次id不一致的小bug。确定了工程1打开后部件的选择就是精确的楼主所展示的6个

打开了jjd里面的工程1vbp，按照推测，稍微修改了模块中的几个常量。报错，尝试运行主页菜单下的任何一个项目，都提示我“找不到工程或库”，不知道什么原因。。。
找到了原因，安装office2010后不再提示找不到库了，现在的问题是模块中的几个常量应该怎么改，毕竟现在想下载当时的驱动版本，mysql server版本已经很难了。
Public Const driv As String = "{MySQL ODBC 5.1 Driver}"  ‘这个字符串怎么获得？
Public Const ser As String = "127.0.0.1"
Public Const db As String = "jjd"
Public Const 人员 As String = "admin"    ’ 这里的人员不是指jjd数据库里的root吧
Public Const 密码 As String = "excelhome"    同上
Public Const cw  As String = "[MySQL][ODBC 5.1 Driver][mysqld-5.5.37]Duplicate entry"     ‘这个字符串怎么获得？
Public 权限 As String