/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

1 vote235 views1 answer
Vba Remove Case Sensitivity
VBA
22 votes400 views1 answer
Excel vba check if directory exists
VBA
31 votes395 views1 answer
Excel vba function to convert column number to letter
VBA
0 vote279 views1 answer
Vba line feed
VBA
0 vote289 views1 answer
Do while not vb.net
VBA
0 vote299 views1 answer
Vba sort the data Z to A
VBA
1 vote257 views1 answer
Vba Remove Case Sensitivity
VBA
0 vote301 views1 answer
Excel filter by date not working vba
VBA
0 vote290 views1 answer
System.Runtime.InteropServices.COMException: 'Call was rejected by callee. (Exception from HRESULT: 0x80010001
VBA
0 vote272 views1 answer
Excel PasteSpecial Format:= can't find the argument
VBA