Bu tür kayıt ekleme işlemlerinde insert into yerine dao kodu kullanılabilir. Yazılan alanlar belirgin olduğu için kod eklemek daha kolay olur.
Dim RSKayit As Recordset
Set RSKayit = CurrentDb.OpenRecordset("Tbl_Banka", RecordsetTypeEnum.dbOpenDynaset)
With RSKayit
.AddNew
!Banka_Adi = Me.Banka_Adi
!Banka_Hesap_No = Me.Banka_Hesap_No
!Banka_Iban = Me.Banka_Iban
.Update
End With