我有一个简单的ms访问数据库,其中包含以下表格:
Patient ID Name Medication ID Name PatientMedication ID PatientID MedicationID
第三个表格是患者和药物之间的多对多表格 - 记录每位患者服用的药物。我想通过允许我选择患者和药物以及将新行存储到PatientMedication表来创建填充此表的表单。
我已经创建了带有下拉列表的表单,并添加了一个按钮来将所选行保存到数据库中,但不知道如何使按钮执行插入操作。我是否必须为按钮编写一些VB代码?我甚至需要一个按钮吗?看起来这非常简单,我应该能够通过表单的某些属性来完成它。或者有更简单的方法来解决这个问题吗?
任何帮助都将不胜感激。
答案 0 :(得分:0)
您实际上可以通过几种不同的方式处理它。以下是几个选项。
设置表单Record Source
的{{1}}属性。将下拉列表PatientMedication
设置为Control Source
和PatientID
。然后确保MedicationID
表格中required
和PatientID
的{{1}}属性设置为MedicationID
。然后,当用户选择下拉值时,记录将被添加到数据库中。这假定PatientMedication
字段数据类型设置为Yes
。
不要将表单的ID
属性设置为AutoNumber
。不要设置下拉列表Record Source
,让它们保持未绑定状态。将PatientMedication
下拉列表的Control Source
属性设置为MedicationID
。将Name
下拉列表的txtMedicationID
属性设置为PatientID
。将命令按钮Name
属性设置为txtPatientID
。对按钮的Name
事件使用以下代码:
cmdInsertRecord