Office中国论坛/Access中国论坛

标题: 还有没有更好的办法来高亮显示子窗体记录？ [打印本页]

作者: goto2008 时间: 2009-12-12 01:57
标题: 还有没有更好的办法来高亮显示子窗体记录？
本帖最后由 goto2008 于 2009-12-12 02:03 编辑

用平常的条件格式怕影响运行速度，一直都使用着下面这个黑色高亮显示的代码
但是发现，一旦多选记录，问题就来了，放开鼠标，肯定要被改成单选第一条记录。很郁闷的说。
不知哪位大哥能想个法子，又可以一整行的高亮显示，又可以随意的多选记录不受影响

Private Sub Form_Current()

DoCmd.RunCommand acCmdSelectRecord

End Sub

作者: t小宝 时间: 2009-12-13 13:29
楼主所说问题确实存在，用如下方法可解决：

在窗体模块添加两个函数过程
Private Function RestoreOnCurrent()
Me.OnCurrent = "[Event Procedure]"
End Function

Private Function CancelOnCurrent()
Me.OnCurrent = ""
End Function

在窗体的鼠标按下事件和主体节上的所有控件的鼠标按下属性中输入：=CancelOnCurrent()
在窗体的鼠标释放事件和主体节上的所有控件的鼠标释放属性中输入：=RestoreOnCurrent()

作者: wang1950317 时间: 2009-12-13 16:52
受教！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)