[VB.NET] Incrementare ID su SQL Server Mobile

[x69asterix]

Ho un problema nel creare ed autoincrementare l'id della mia tabella così composta. premetto che senza il campo id l' inserimento avviene senza problemi, ma con l'inserimento dell'id non capisco come dovrebbe autoincrementare?

  Dim dat As String = ComboBox3.Text + "/" + ComboBox4.Text + "/" + ComboBox2.Text

        Try
            ExecSql("INSERT INTO Bancomat VALUES ('" & dat & "'," & TextBox1.Text & ",'" & Me.ComboBox1.Text & "','" & Me.TextBox2.Text & "')")

            Dim commandBuilder As SqlCeCommandBuilder
            dataAdapter = New SqlCeDataAdapter("SELECT * FROM Bancomat order by Data asc", cn)
            commandBuilder = New SqlCeCommandBuilder(dataAdapter)
            dataSet = New Data.DataSet
            dataAdapter.Fill(dataSet)
            Application.DoEvents()
            DataGrid1.DataSource = dataSet.Tables(0)
            cn.Close()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
        DataGrid1.Refresh()