窗体

啊拉　发表于：2011-04-25 10:09:43 　

复制

Access 2003窗体中如何禁止使用鼠标滚轮从一条记录滚动到另一条记录？

Top

风行发表于：2011-04-25 10:49:54

点击"窗体属性"→"数据"→"允许添加"→选择"否" 试试

Top

啊拉发表于：2011-04-25 10:53:21

窗体属性里面允许添加设为否
这个方法，设置鼠标滚动还是会转到下一个记录，这个设置是不允话添加新记录的设置方法。

Top

煮江品茶发表于：2011-04-25 16:02:47

可以采用回跳的方法：

Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)
If Count > 0 Then
DoCmd.RunCommand acCmdRecordsGoToPrevious
Else
DoCmd.RunCommand acCmdRecordsGoToNext
End If
End Sub

Top

zhaoyoulong 发表于：2011-04-25 19:57:45

给你一个现成的例子：

将例子中的模块代码导入到你的数据库中

将你要禁止的窗体的打开事件中添加代码：

Option Compare Database
Private MouseHook As Object '鼠标滚动别忘了

Private Sub Form_Open(Cancel As Integer)
    Set MouseHook = NewMouseHook(Me)
    MouseHook.Scroll = False

End Sub

点击下载此附件

Top

jia 发表于：2011-04-26 07:44:43

完美的禁止鼠标滚轮方法，不用代码不用子窗体！

http://www.accessoft.com/article-show.asp?id=4358

Top

总记录：5篇页次：1/1 9 1 :

Access交流中心

窗体