VBSCall RunApp("文件路径")
这个是调用打开文件的命令,具体的启动和停止键,你在编译栏右边的脚本属性自己设置。
我用的是按键7,不知道8会有什么改变
看看多媒体插件。。有例子的。。如果用了例子都出不来那是你电脑和按键兼容的问题
我会,~~~短信你
命令名称: Beep 蜂鸣器
命令功能: 蜂鸣器
命令参数: 参数1 整数型,音频频率
参数2 整数型,播放时间
返 回 值: 无
脚本例子:
//下面这句是音阶(标准(M))音符(DO(1))节拍(1/16拍)
Plugin Media.Beep(523, 200)
//下面这句是音阶(标准(M))音符(RE(2))节拍(1/16拍)
Plugin Media.Beep(578, 200)
//下面这句是音阶(标准(M))音符(MI(3))节拍(1/16拍)
Plugin Media.Beep(659, 200)
//下面这句是音阶(标准(M))音符(FA(4))节拍(1/16拍)
Plugin Media.Beep(698, 200)
//下面这句是音阶(标准(M))音符(SO(5))节拍(1/16拍)
Plugin Media.Beep(784, 200)
//下面这句是音阶(标准(M))音符(LA(6))节拍(1/16拍)
Plugin Media.Beep(880, 200)
//下面这句是音阶(标准(M))音符(SI(7))节拍(1/16拍)
Plugin Media.Beep(988, 200)
Msgbox "Beep 播放结束!!"
命令名称: Play 播放
命令功能: 播放[Mp3,Wav,Mid]音乐文件
命令参数: 参数1 字符串型,音乐文件路径
返 回 值: 无
脚本例子:
//下面这句是播放路径("C:\WINDOWS\Media\Windows XP 启动.wav")音乐文件
Plugin Media.Play("C:\WINDOWS\Media\Windows XP 启动.wav")
Msgbox "现在 播放音乐!!"
命令名称: Stop 停止
命令功能: 关闭声音播放
命令参数: 无
返 回 值:
//下面这句是关闭声音播放
Plugin Media.Stop()
Msgbox "播放停止!!"
命令名称: Vol 音量
命令功能: 设置主音量大小
命令参数: 参数1 整数型,音量大小
返 回 值: 无
脚本例子:
//音量大小: 0到100
//下面这句是设置主音量大小为(50)
Plugin Media.Vol(50)
Msgbox "设置了声音大小!!"