Imports System.Data.OleDb
Public Class NeueLektion
    Dim dbVerbindung As New OleDbConnection
    Dim dbBefehl As New OleDbCommand
 
 
    Private Sub cmdweiterevokabel_Click(sender As System.Object, e As _
      System.EventArgs) Handles cmdweiterevokabel.Click
        dbVerbindung.ConnectionString =
          "Provider=Microsoft.jet.oledb.4.0;data" & _
            "source=C:\Vokabeldatenbank1.accdb"
        dbBefehl.Connection = dbVerbindung
 
        dbBefehl.CommandText = "Update Tabelle1 set Englisch = Hallo where ID=1"
 
        dbVerbindung.Close()
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist