在VB里怎样模拟翻页操作?

[StarLittle]

在窗体上有一RTF控件,我想不用滚动条,而用按钮来控制翻页.我的做法是模拟RTF的
KeyDown事件,参数用vbKeyPageUp等等,然而虽然能触发事件,却没能翻页.诸位大侠,
谁能告诉我原因和解决方法?

[StarLittle]

多谢!但是不知有没有不用API的方法.

[WHQ]

其它方法不过是实现了对API的封装，其本质是一样的

[Venne]

没理由，我原来的做法有两种，因为现在没用VB写了，但不会像你说得那样：
第一：我使用VB的模拟按键的函数，向窗口发送PAGEDOWN和PAGEUP被按下的效果，要点是当时你的RTF控件有焦点，所以当按钮按下时，第一要用SETFOCUS。
第二：直接向RTF控件发送KEYDOWN消息，参数即带PAGEDOWN或者PAGEUP，RTF控件同样会以为有键盘按下。
估计没有工作的原因是否你没有设置焦点到RTF控件

[StarLittle]

你说的第一种做法我不清楚,但第二种是不对的.我就是先SetFocus,然后再调用KeyDown,可还是不行.另:模拟案件的函数是什么?

[StarLittle]

Venne,多谢!用SendKeys可以搞定.

[WHQ]

WPARAM参数取值为SB_LINEDOWN、SB_LINEUP、SB_PAGEDOWN或SB_PAGEUP之一，LPARAM值必须为0。VB的语法我不懂，所以只能写到此了。