Dim conn As New MySql.Data.MySqlClient.MySqlConnection()
        Dim cmd As New MySql.Data.MySqlClient.MySqlCommand()
        Dim mysqladaper_pwd As New MySql.Data.MySqlClient.MySqlDataAdapter( _
          "SELECT * from benutzer order by Benutzername", conn)
        Dim myConnectionString As String
        myConnectionString = "server=127.0.0.1;" _
                    & "uid=my_sql_db;" _
                    & "pwd=test;" _
                    & "database=Benutzer;"
 
            Dim cBuilder As New MySql.Data.MySqlClient.MySqlCommandBuilder()
            conn.ConnectionString = myConnectionString
            conn.Open()
            cmd.Connection = conn3
            mysqladaper_pwd.Fill(ds_passwort, "benutzer")
....
 
                mysqladaper_pwd.Dispose()
                conn3.Close()
                Ts_form.Show()