เชื่อม mysql ไม่ได้ครับ โหลดตัวmysqlมาแอดแล้วก็ไม่ได้

Imports MySql.Data.MySqlClient

Dim con As New MySqlConnection

If Not con Is Nothing Then con.Close()
con.ConnectionString = "server=localhost; user id=root; password=1234; database=test; pooling=false"
        Try
            con.Open()
  
            MsgBox("Connected")
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
        con.Close()