Dim verbindung As System.Data.SqlServerCe.SqlCeConnection
Dim cmd As SqlCeCommand
Dim sql As String
 
verbindung = New SqlCeConnection("Data" & _
  "Source=C:\Users\me\Desktop\ManagementSystem.sdf")
Try
  verbindung.Open()
  sql = "INSERT INTO customer (id, name) VALUES (1, 'mustermann')"
  cmd = new SqlCeCommand(sql, verbindung)
  cmd.ExecuteNonQuery()
  verbindung.Close()
 
  MsgBox("Datensatz eingefuegt")
'laut Debugging, wird der Datensatz erfolgreich eingefuegt und der Catch-Block
'nicht aufgerufen
Catch ex As Exception
  MsgBox(ex.toString)
End Try