中科新闻网英雄联盟阿狸头像:关于在word文档中添加音乐文件
来源：百度文库 编辑：中科新闻网 时间：2024/05/01 05:27:46
我想在我的word文档中添加背景音乐，并希望在打开文档的同时能自动播放这一音乐。请问应当怎样做？
Word中不能直接播放音乐，但你可以添加一个宏：
1.打开Word文档
2.按Alt+F11
3.双击打开Project->Microsoft Word 对象->ThisDocument
4.添加如下内容
Private Sub Document_Open()
strSoundFile = "E:\WINNT\Media\The Microsoft Sound.wav"
Set objShell = CreateObject("Wscript.Shell")
strCommand = "sndrec32 /play /close " & Chr(34) & strSoundFile & Chr(34)
objShell.Run strCommand, 0, True
End Sub
其中strSoundFile变量的值为音乐路径。
注意：要把宏安全性改为中或低。