在vb连接mysql数据库_VB连接Mysql数据库

然后下载安装MysqL，odbc驱动

需要添加ado'菜单"工程"->"引用" 找 Microsoft ActiveX Data Object.... 或者简单点找到ado控件 扔到窗口上 再删除 也行

在vb中连接数据库的代码：

Dim cn As New ADODB.Connection

Dim rs As New ADODB.Recordset

' 定义数据库连接字符串变量

Dim strCn As String

' 定义数据库连接参数变量

Dim db_host As String

Dim db_user As String

Dim db_pass As String

Dim db_data As String

' 定义 sql 语句变量

Dim sql As String

' 初始化数据库连接变量

db_host = "localhost"

db_user = "root" ‘用户名

db_pass = "root" ’用户密码

db_data = "radio" '数据库名

' MysqL ODBC 连接参数

'+------------+---------------------+----------------------------------+

'| 参数名 | 默认值 | 说明 |

'+------------+----------------------------------------------