Добавление данных в бд Access - VB

Формулировка задачи:

собственно вопрос следующий,для программы требуется чтоб при запуске приложения возникала форма требующая ввод имени пользователя и фамилии в текствовое поле,и при нажатии на кнопку подтвердить в уже имеющуюся базу добавлялось в поле 1 имя и фамилия пользователя,а в поле 2-время нажатия на кнопку,как осуществить програмно через VB добавление записей в бд? необходимо чтобы записи добавлялись в конец таблицы(дописывались),но ни в коем случае не заменяли уже имеющиеся записи просьба какахами сильно не обкидывать) мы ещё учимся)

null

вот какраз значения полей text1 и text2 необходимо занести в таблицу Access

Решение задачи: «Добавление данных в бд Access»

textual
                            Листинг программы 
                        

                            Dim db As DAO.Database 
Dim rs As DAO.Recordset 
Dim sSQL As String 
 
Private Sub command1_click()
 
 
rs.AddNew
rs.Fields(1) = Text1.Text
rs.Fields(2) = Time
rs.Update
rs.Close
 
db.Close
Unload Me
 
 
End Sub
 
Private Sub Form_Load()
Set db = DAO.OpenDatabase(App.Path & "\db4.mdb")
sSQL = "SELECT * FROM Users;"
Set rs = db.OpenRecordset(sSQL)
End Sub
                        