Sub sql_verbindung()
        MysqlConn = New MySqlConnection()
        'Connection String
        MysqlConn.ConnectionString = "server=192.168.61.5;" _
        & "user id=test;" _
        & "password=test;" _
        & "database=anlagendatenbank;" _
        & "Convert Zero Datetime=True" 'Dies habe ich eingefügt damit ich die 
        ' MySql Splate "Date" in die Spalte "System.DateTime" Laden kann. ( 
        ' Funktioniert auch)
        ' Try, Catch, Finally
        Try
            MysqlConn.Open()
        Catch myerror As MySqlException
            MessageBox.Show("Cannot connect to database: " & myerror.Message)
        Finally
        End Try
    End Sub

​Sub abfrage_anlagenNr()
        TblAnlagenNrDataGridView.Columns(5).DefaultCellStyle.Format = _
          "dd-MM-yyyy"
        SQL = "SELECT * FROM tblAnlagenNr"
        anlagendatenbankCommand.Connection = MysqlConn
        anlagendatenbankCommand.CommandText = SQL
        anlagendatenbankAdapter.SelectCommand = anlagendatenbankCommand
        anlagendatenbankAdapter.Fill( _
          Me.Anlagendatenbank_data_set_mysql.tblAnlagenNr)
        Dim oCB As MySqlCommandBuilder
        oCB = New MySqlCommandBuilder(anlagendatenbankAdapter)
        oCB.GetInsertCommand()
    End Sub

 TblAnlagenNrDataGridView.EndEdit()
        TblAnlagenNrBindingSource.EndEdit()
        anlagendatenbankAdapter.Update( _
          Anlagendatenbank_data_set_mysql.tblAnlagenNr)