Public Sub db_test()
        Dim myConnString As String
        myConnString = "Database=test_db;Data Source=localhost;User" & _
          "Id=root;Password="
        Dim myConn As New ByteFX.Data.MySqlClient.MySqlConnection(myConnString)
        myConn.Open()
    End Sub

Eine nicht behandelte Ausnahme des Typs _
  'ByteFX.Data.MySqlClient.MySqlException' ist in bytefx.mysqlclient.dll _
  aufgetreten.
 
Zusätzliche Informationen: Unable to connect to any of the specified MySQL hosts