#22002/11/9 13:03:06
不知能否解决你的问题:
你可以点击(菜单)视图→工具栏→控件工具箱,然后在出现的控件工具中添加按钮控件,CommandButton1,文本框控件Text1,双击CommandButton1,进入VBA程序计窗口,在里面输入代码
If Text1.Text <> "" Then
If Text1.Text <= Flash1.TotalFrames Then
Flash1.GotoFrame (Text1.Text)
Flash1.Play
Else
MsgBox ("指定要播放的帧数大于总帧数!")
End If
End If
同样也可以控制Flash的其它属性,如Sop,Play等,另在打开幻灯片时如出现是否加载宏,请选择“是”