dim I as integer

  'SQL-Anweisung konfigurieren
  Dim strSQL as string = "DELETE FROM benutzerTabelle" & _
  " WHERE BenutzerID = 5"
  'Objekt erzeugen und Eigenschaften festlegen
  Dim objCmd as New OleDbCommand(strSQL, Verbind)

  I = objCmd.ExecuteNonQuery()