5.　如何在课件中实现文本的卷滚

　　问：我想在课件中制作一个能够自动卷滚的文本框，请问应该怎么实现呢？

　　阿鸣解惑：实现文本自动卷滚的方法如下：

　　创建文本对象“文本_0”，编辑“文本_0”的内容为古文“爱莲说”的全文。

　　单击选中“文本_0”，在“属性箱”的“动作”选项卡中双击事件列表中的“鼠标双击”事件，打开“动作编辑”对话框。

　　单击“动作编辑”对话框中的“对象方法”按钮，在打开的“对象方法”对话框中单击选中“StartAutoscroll”选项。单击“确定”按钮，如图14所示。

图14　设置文本自动卷滚

　　返回“动作编辑”对话框，在“参数填写格式：整数型，整数型”编辑框中输入“1,5”，并单击“确定”按钮，如图15所示。

图15　设置卷滚参数

　　小提示：参数“1,5”中，1表示向上滚动，5表示滚动速度。

　　保持“文本_0”的选中状态，双击“属性箱/动作”选项卡中的“鼠标点按”事件。在打开的“动作编辑”对话框中单击“对象方法“按钮，选中“StopAutoscroll”选项。单击“确定/确定”按钮。

　　执行菜单“控制/预演”命令，在文本区域双击鼠标开始滚动，单击鼠标停止滚动，如图16所示。

图16　演示效果