/VBA/How to use VBA to add new record in MS Access?

How to use VBA to add new record in MS Access?

Private Sub btnAddRecord_Click() 
Dim tblCustomers As DAO.Recordset 

Set tblCustomers = CurrentDb.OpenRecordset("SELECT * FROM [tblCustomers]") 
tblCustomers.AddNew 
tblCustomers![Customer_ID] = Me.txtCustomerID.Value 
tblCustomers![CustomerName] = Me.txtCustomerName.Value 
tblCustomers![CustomerAddressLine1] = Me.txtCustomerAddressLine1.Value 
tblCustomers![City] = Me.txtCity.Value 
tblCustomers![Zip] = Me.txtZip.Value 
tblCustomers.Update 
tblCustomers.Close 
Set tblCustomers = Nothing 
DoCmd.Close 
End Sub

Source: stackoverflow.com

Similar codes

0 vote227 views4 answers
Vgrive,deb
VBA
0 vote198 views1 answer
Label de tableau dans des label.text en VBA
VBA
0 vote228 views1 answer
Vba registry settings
VBA
3 votes229 views1 answer
Excel vba make long from two shorts
VBA
0 vote189 views1 answer
Excel vba range contains
VBA
0 vote250 views2 answers
Excel vba store array and write to sheet
VBA
0 vote213 views1 answer
Excel delete ever other vba
VBA
-1 vote223 views1 answer
Code for reading letters only in vb 6
VBA
5 votes208 views1 answer
Xl vba double quotes in string literal
VBA
0 vote198 views1 answer
Supprimer la valeur de celule vba
VBA