连接字符串以及需要安装的程序等等....

解决方案 »

  1.   

    从http://www.mysql.com下载3.51 Mysql odbc驱动程序。然后用adodb连接。
    Private Sub Command1_Click()
    Dim conn As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    conn.Open "Driver=MySQL ODBC 3.51 Driver;" & _
               "Server=LocalHost;" & _
               "Port=3306;" & _
               "Database=test;" & _
               "Uid=;" & _
               "Pwd="
    conn.DefaultDatabase = "mysql"conn.CursorLocation = adUseClient
    rs.Open "select * from user", conn
    Set DataGrid1.DataSource = rsDataGrid1.Columns(0).Caption = "主机"
    DataGrid1.Columns(1).Caption = "用户名"End Sub