Pytanie : Przedmiot zmienna lub z blokowy zmienna ustawiać

i m using dostęp i i mieć the pętla error

Dim DB Jako Database
Dim rs Gdy DAO.Recordset
For i = Val (txtNoFrom) Val (txtNoTO)
cmbCarInsert.SetFocus

DB.Execute "Wszywka w tblPetrolDetails (PetrolID, Carno, voucherno, vouchervalue)" & _
" wartość (" & ID &", ""& cmbCarInsert.Text &"", ""& i &"", "& Val (txtInsertValue) & ") "

Next

The breakpoint być przy db.execute przy the pierwszy round the pętla. i sprawdzać wszystkie the wartość the kontrola, wszystko być pusty.

Odpowiedź : Przedmiot zmienna lub z blokowy zmienna ustawiać

Ciemnawy DB Jako Baza danych
Ciemnawy rs Jako DAO.Recordset

ustawiać DB=currentdb () '<>
Dla i = Val (txtNoFrom) Val (txtNoTO)
cmbCarInsert.SetFocus

     DB.Execute "Wszywka w tblPetrolDetails (PetrolID, Carno, voucherno, vouchervalue)" & _
"wartość (" & ID & ", "" & cmbCarInsert.Text & "", ""& i &"", "& Val (txtInsertValue) & ") "
     
Następnie