/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 vote126 views1 answer
Excel vba chrw max value
VBA
4 votes142 views1 answer
Excel vba how to get a range's full address including sheet name
VBA
1 vote131 views1 answer
Excel how to format bytes as KB, MB, GB
VBA
0 vote177 views1 answer
Vba excel do not recalculate before save
VBA
2 votes125 views1 answer
Excel vba extract file name
VBA
0 vote125 views1 answer
Excel vba send HTTP POST to server
VBA
0 vote131 views1 answer
How to get the value of optionbutton in vba
VBA
1 vote138 views1 answer
Excel vba last row of range
VBA
0 vote155 views2 answers
Get unique random number in vb.net
VBA
0 vote136 views1 answer
Vbnet find highest value in chart
VBA