必须安装mysql的驱动才行，不管是vb还是c++都需要这个驱动。
成都创新互联秉承实现全网价值营销的理念，以专业定制企业官网，成都做网站、网站设计，成都小程序开发，网页设计制作，成都手机网站制作，网络营销推广帮助传统企业实现“互联网+”转型升级专业定制企业官网,公司注重人才、技术和管理，汇聚了一批优秀的互联网技术人才,对客户都以感恩的心态奉献自己的专业和所长。
代码如下：
public
function
exemysql(byval
sql
as
string)
as
adodb.recordset
sql
=
trim$(sql)
set
conn
=
new
adodb.connection
set
rs
=
new
adodb.recordset
conn.open
"driver=mysql
odbc
3.51
driver;"
_
"server=服务器地址;"
_
"port=3306;"
_
"database=数据库名;"
_
"uid=用户名;"
_
"pwd=密码"
conn.defaultdatabase
=
"数据库名"
conn.cursorlocation
=
aduseclient
set
rs.activeconnection
=
conn
rs.locktype
=
adlockbatchoptimistic
rs.cursortype
=
adopenkeyset
rs.open
sql
set
exesql
=
rs
set
rs
=
nothing
set
conn
=
nothing
end
function
在VB中存储数据到MySQL数据库的过程非常简单，只需要建立一个数据库连接，然后使用SQL语句将数据写入数据库即可。
首先连接数据库，上网上找一下，有很多的例子，但是记得sql sever要配置，这个是很重要的，然后是按钮的程序，用connection去执行那个SQL语句，就是那个insert 语句，插入语句，如果你想判断是否重复的话，可以用recordset去执行insert语句，根据返回的recordcount去判断或者判断那个EOF还是BOF我忘了，其实这个代码还行，工作量还可以
和SQL数据库差不多的，下面是我用vb6.0连接本地mysql数据库的连接字符串
"driver={MySQL ODBC 3.51 Driver};server=127.0.0.1;database=mysql;uid=root;pwd=sasa"
