a = Dlookup ("[id]", "[tbl_dvit1]", "[donem]=" & Me.c)
parantez içindeki 3. bölümde Me.c ile karşınıza gelen değer "Ocak 2013" vb. metin yani String türünde bir değişkendir. Bu tip değişkenleri mutlaka tek tırnaklar içinde kullanmalısınız:
a = Dlookup ("[id]", "[tbl_dvit1]", "[donem]='" & Me.c & "'")