我试图找出如何在组合框中使用AfterUpdate让它从表中找到记录" Userdata" where field" Recall_position"等于" 1"并用" 0"替换它。
然后找到在组合框中选择的记录(已更新为)和"用户数据"在" Recall_position"把数字" 1"
答案 0 :(得分:1)
喜欢这个吗?
Private Sub cmbTest_AfterUpdate()
CurrentDb.Execute "update Userdata set Recall_position = 0 where Recall_position = 1"
CurrentDb.Execute "update Userdata set Recall_position = 1 where ID = " & Me.cmbTest.Column(0)
End Sub
第一个查询将Recall_position = 1
的所有记录更新为Recall_position = 0
。
第二个查询使用组合框中所选项目的第一列中的ID将记录更新为Recall_position = 1
。
(我认为它是一个数值,表格中的列称为ID
)
答案 1 :(得分:0)
所以使用我的代码
Private Sub Combo1_AfterUpdate()
CurrentDb.Execute "UPDATE Userdata SET Recall_position = 0 WHERE Recall_position = 10"
CurrentDb.Execute "UPDATE Userdata SET Recall_position = 10 WHERE Lastname = '" & Me.Combo1.Column(1) & "'"
End Sub
这样可以清除10并将右行更新为 10也是。但是,它也在Lastname
中使用随机数更新第二行