エラーはMySQLクライアントから発生しています。接続文字列に、指定していない特定のパラメータを指定することを期待しているようです。私はマネージドMySQLドライバーに精通していないため、何が欠けているのかを教えてくれませんが、何かが 行方不明はかなり明らかです。
1つのパラメーターの終わりを示すセミコロンと、次のパラメーターの名前の間にスペースを追加してみてください。このように：
Dim con As New MySqlConnection("Server=" + host + "; Database=" + database + "; Uid=" + user + "; Pwd=" + password + ";")