Vba 检查Access表中是否已存在数据

我试图检查表中是否存在日期类型。我得到的代码是：

如果CurrentDb.OpenRecordSets从tbl_Fechas_Proceso_Contable中选择tbl_Fechas_Proceso_Contable.Fecha，其中tbl_Fechas_Proceso_Contable.Fecha=&Forms！我们的程序是可控制的！txt_Fecha_Creacion&；。那么字段1>0 MsgBox La fecha ingresada ya ha sido consultada 如果结束 我看到了一个类似的问题，但是对于Integer，我不知道如何处理日期类型，我也不明白为什么表达式>0。我像这样执行，Access说项不在此集合中，错误3265

我的桌子是这样的：

|---------------------|
| ID  | Fecha         |
|---------------------|
| 1   | 16/10/2018    |
|---------------------|
| 2   | 17/10/2018    |
|---------------------|

---

日期是Access中的保留字。尝试使用括号，查询中的日期值必须包含在的中。此外，索引通常以零开头，因此这里的字段为0

If CurrentDb.OpenRecordset("SELECT tbl_Fechas_Proceso_Contable.[Fecha] FROM tbl_Fechas_Proceso_Contable WHERE tbl_Fechas_Proceso_Contable.[Fecha]=#" & Forms!frm_Proceso_Contable!txt_Fecha_Creacion & "#;").Fields(0) > 0 Then
        MsgBox "La fecha ingresada ya ha sido consultada"
End If

---

*我相信你的问题是索引不存在，fields1。虽然fecha是西班牙语的日期，但我认为它不是保留的-使用这些括号仍然是一个好习惯，否则你会遇到这个问题。但是如果使用字段1，这不是指字段fecha吗？如果这是阅读选择tbl_Fechas_Proceso_Contable.fecha，tbl_Fechas_Proceso_Contable.cuenta。。。那么cuenta将是Fields1。大多数索引以0开头。