Public Class Form1
 
    Dim sqlConnection1 As New System.Data.SqlClient.SqlConnection("Notizen.mdf")
    Dim cmd As New System.Data.SqlClient.SqlCommand
 
 
 
    Private Sub butErstellen_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles butErstellen.Click
        cmd.CommandType = System.Data.CommandType.Text
        cmd.CommandText = "INSERT Notizen (Titel, Text, createDate) VALUES (" & _
          "'Test', 'Testtext', '18.05.1999 23:01')"
        cmd.Connection = sqlConnection1
 
        sqlConnection1.Open()
        cmd.ExecuteNonQuery()
        sqlConnection1.Close()
    End Sub
 
 
End Class