使用表单和子表单访问VBA代码格式更新表

时间:2017-05-11 10:11:33

标签: vba access-vba

我目前正在学习访问和VBA。我正在尝试使用一个嵌入了子表单的表单来更新My access 2013数据库中的表。该表称为考试类别,有两个字段,分别是名为ExamCatCode和ExamDescription的文本字段。我在表单上创建了一个删除按钮,它将删除在子窗体上选择的记录,该记录显示表的结果。以前我将ExamCatCode作为数字格式字段,我使用以下代码删除记录:

CurrentDb.Execute"从ExamCategories"删除&安培; _                 "在哪里ExamCatCode =" &安培; Me.ExamCategoriesSubform.Form.Recordset.Fields(" ExamCatCode&#34)

现在我已经将ExamCatCode更改为文本格式字段代码无法正常工作,我认为我在某个地方错过了引号或撇号,有些人可以请我直截了当。谢谢

1 个答案:

答案 0 :(得分:1)

试试这个:

CurrentDb.Execute "DELETE * FROM ExamCategories " & _
                  "WHERE ExamCatCode= '" & Me.ExamCategoriesSubform.Form![ExamCatCode] & "'", dbFailOnError