/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 vote123 views1 answer
How to carry text to the next line in a label in vb.net
VBA
1 vote119 views1 answer
S yyyy-MM-dd HH:mm:ss Short Date Local
VBA
0 vote123 views1 answer
Remove frist letter from string vbnet
VBA
8 votes152 views1 answer
Excel vba make word
VBA
1 vote112 views1 answer
How to do error handling in access vba
VBA
0 vote123 views1 answer
Excel vba StartUpPosition
VBA
3 votes125 views1 answer
Vba make long from two shorts
VBA
0 vote124 views1 answer
Excel vba disable keyboard input
VBA
20 votes179 views1 answer
Excel vba factorial
VBA
0 vote122 views1 answer
Vba pass named range to function
VBA