7,730
社区成员
发帖
与我相关
我的任务
分享ACCESS窗体如何实现滚轮滚动效果
各位好，元宵节快乐！：）
我正在做一个ACCESS的窗体，可是属性太多了，一个屏幕显示不开，想实现滚动鼠标滚轮向下翻页的效果，可是现在滚动鼠标滚轮是数据切换，不知道怎么实现在窗体上利用鼠标滚轮翻页呢?
谢谢大家的帮助。
我正在做一个ACCESS的窗体，可是属性太多了，一个屏幕显示不开，想实现滚动鼠标滚轮向下翻页的效果，可是现在滚动鼠标滚轮是数据切换，不知道怎么实现在窗体上利用鼠标滚轮翻页呢?
谢谢大家的帮助。
...全文
请发表友善的回复…
发表回复
ilec0602 2008-02-21
- 打赏
- 举报
liuyann兄，你太强了，我看好多帖子都说要调用API才能实现，没想到被你这么简单就实现了，佩服，实在是很佩服！
我已经申请加入那个群了，希望能够批准，谢谢拉
我已经申请加入那个群了，希望能够批准，谢谢拉
liuyann 2008-02-21
- 打赏
- 举报
=========================================================
可加入QQ群 19055578 晚19:00 - 24:00在线
=========================================================
== 思想重于技巧 ==
liuyann 2008-02-21
- 打赏
- 举报
你是高手!
== 思想重于技巧 ==
liuyann 2008-02-21
- 打赏
- 举报
Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)
SendKeys IIf(Count > 0, "{PGDN}", "{PGUP}")
End Sub== 思想重于技巧 ==
ilec0602 2008-02-21
- 打赏
- 举报
在MouseWheel里加一段函数可以么？我不知道具体该怎么写
liuyann 2008-02-21
- 打赏
- 举报
没办法，事被窗体处理为下一记录了
== 思想重于技巧 ==
liuyann 2008-02-21
- 打赏
- 举报
我试试
== 思想重于技巧 ==
liuyann 2008-02-21
- 打赏
- 举报
== 思想重于技巧 ==
