求助！关于复选框

大白菜小白菜

我只想通过复选框选定子窗体查询得到的数据，而我每次点击“清除”按钮刷新窗体时显示的是所有数据都被选定，这是为什么？各位老师、前辈有空帮我看看，谢谢你们！

大白菜小白菜

站到终点站 发表于 2015-2-3 16:57
把审核_AfterUpdate过程代码更改成下面的样子

很感谢你！纠结我这么久的问题解决了。谢谢前辈！

站到终点站

把审核_AfterUpdate过程代码更改成下面的样子

1. Private Sub 审核_AfterUpdate()
   
2. 
   
3.     DoCmd.SetWarnings False
   
4.     If Me.订单表查询子窗体.Form.Filter = "" Then
   
5.         DoCmd.RunSQL "UPDATE 订单表 SET 审核=" & Me.审核
   
6.     Else
   
7.         DoCmd.RunSQL "UPDATE 订单表 SET 审核=" & Me.审核 & " Where " & Me.订单表查询子窗体.Form.Filter
   
8.     End If
   
9.     DoCmd.SetWarnings True
   
10.     Me.订单表查询子窗体.Requery
    
11. End Sub

复制代码

大白菜小白菜

站到终点站 发表于 2015-2-3 16:22
我的版本是2010的，没有这个问题啊

我想“审核选择”复选框事件通过代码改成：只选定当前窗体显示的记录应该就不会有问题。但不知道代码怎么改。

大白菜小白菜

站到终点站 发表于 2015-2-3 16:22
我的版本是2010的，没有这个问题啊

不是你那样选择的，用窗体上头的“审核选择”复选框选择查询得到的结果，而不是手工一个个勾选（考虑到查询结果可能有数百条呢）。你用“审核选择”复选框勾选查询得到的结果然后点击“清除”刷新窗体就会显示所有记录被勾选了。我想是不是审核勾选事件代码有问题，我是小白也不懂，老师给我看看。

站到终点站

我的版本是2010的，没有这个问题啊

大白菜小白菜

站到终点站 发表于 2015-2-3 15:15
这下真的就不懂了，似乎你那个附件没有这个问题啊，选中复选框之后，其他项是没有被自动选中的

你点“清除”刷新自窗体没？刷新子窗体后就显示所有记录被选定了。

站到终点站

这下真的就不懂了，似乎你那个附件没有这个问题啊，选中复选框之后，其他项是没有被自动选中的

大白菜小白菜

大白菜小白菜 发表于 2015-2-2 22:25
是我表达不好，让各位老师误解了，对不起。我的意思是(以以下图片为例子)：例如我查询“客户名称”为“5 ...

即刷新窗体后得到如图结果

大白菜小白菜

站到终点站 发表于 2015-2-2 14:07
你子窗体的数据源是预先指定为一个SELECT语句：
SELECT [订单表查询]., [订单表查询].[客户名称], [订单表 ...

是我表达不好，让各位老师误解了，对不起。我的意思是(以以下图片为例子)：例如我查询“客户名称”为“5”的记录，显示结果是两条。我想用复选框只选定这两条结果，但是我用”清除“按钮刷新窗体查看是否真的只选定两条记录时发现，其实所有记录都被选定了。我想得到的结果是复选框只选定了查询得到的两条记录。