connect to database (mysql) ผมอยากเชื่อต่อดาต้าเบสน่ะครับ เบสคือmysql เมื่อก่อนเคยใช้accress เป็นเบส ก็สะดวกดีครับ ใช้วิซาดคลิกๆ

Dim strConnection As String = "Database=xxx;host=xxx;User Id=xxx;Password=xxx" '
        Dim cn As New MySqlConnection(strConnection)
        cn.Open()
        Dim da As New MySqlDataAdapter
        Dim ds As New DataSet
        Dim strSQL As String = ("SELECT *  FROM data")
        Dim cb As New MySqlCommandBuilder(da)
        da.SelectCommand = New MySqlCommand(strSQL, cn)


 cn.Close()