kuyuadı adlı comboboxınızın satır kaynağı sorgusunu
SELECT tblkuyu.Kimlik, tblkuyu.kuyuadı, tblkuyu.Kampadı, tblkuyu.Bitiştar
FROM tblkuyu
WHERE ((IsNull([tblkuyu]![Bitiştar])<>0))
ORDER BY tblkuyu.kuyuadı;
olarak düzenlerseniz bitiş tarihi olan kuyular listelenmez.