Excel中“集成”背景音乐全攻略(3)
方法是:借助“控件工具箱”绘制两个命令按钮,将其Caption属性分别设置为“播放音乐”和“停止播放”(如图3),双击这两个按钮并分别在其Click事件中加上下面的代码: Private Sub CommandButton1_Click() Sheet1.WebBrowser1.Navigate "d:工资表PLAY.HTM" End Sub Private Sub CommandButton2_Click() Sheet1.WebBrowser1.Navigate "d:工资表STOP.HTM" End Sub 关闭代码窗口并返回到Excel文档中,此时单击“播放音乐”按钮就可以播放背景音乐,单击“停止播放”按钮就听不到背景音乐了(因为此时调用的是空白的网页文件“STOP.HTM”)。 Cico提示:当这两个按钮出现在表格中时,默认是可以被打印的(预览时可以看到),如果不希望被打印出来,可右击按钮,选择“设置控件格式”命令,在弹出的“设置控件格式”对话框中切换到“属性”选项卡,去掉“打印对象”复选框的选中状态就可以了(“窗体”工具箱中的“按钮”默认是不被打印出来的)。 另外,感兴趣的朋友还可以将这些代码创建好后指定给自定义的工具栏按钮,这样以后打开任何一个Excel文档都可以听到想听的背景音乐了。
首页 上页 | 1 | 2 | 3 | 下页 尾页 共 3 页