- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何用代码设置系统音量 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=39749)
-- 发布时间：2013/8/31 17:47:00
-- 如何用代码设置系统音量
waveOutGetVolume() 、waveOutSetVolume 函數可以获得和设置系统音量，请问如何设置？
-- 发布时间：2013/8/31 17:59:00
--
你参考一下做吧http://www.foxtable.com/help/topics/1937.htm
百度一下WINDOWS 音量API
-- 发布时间：2013/8/31 21:15:00
--
做了个例子，可以控制音量的。代码来自网络。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:调节音量.table |
-- 发布时间：2013/8/31 21:34:00
--
先谢谢！
[此贴子已经被作者于2013-8-31 21:35:49编辑过]
-- 发布时间：2013/8/31 21:36:00
--
开始我也这样定义，后来发觉获取不到音量。
Declare Function waveOutGetVolume Lib "MMSYSTEM.DLL"(ByVal wDeviceID As Integer, dwVolume As Long) As Integer
这里要改成
Declare Function waveOutGetVolume Lib "MMSYSTEM.DLL"(ByVal wDeviceID As Integer, ByRef dwVolume As Long) As Integer
-- 发布时间：2013/9/1 9:08:00
--
“有点甜”的代码用于设置 波形音量，如果希望控制 主音量 该如何设置？
打开系统主音量设置窗口：
shell("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,0")\'声音和音频设备属性
Sendkeys.Send("%v")
此主题相关图片如下：音量.jpg
-- 发布时间：2013/9/1 23:14:00
--
可以操作主音量的。如下例子
-- 发布时间：2013/9/2 6:35:00
--
非常感谢！
-- 发布时间：2013/12/31 23:51:00
--
甜老师：把Sendkeys.Send("%v")去掉则打不开主音量控制？%v是什么意思？谢谢！
-- 发布时间：2021/12/30 13:14:00
--
太强，爱死狐表了！
那请问，如果我想直接给定音量值的方式控制音量。应该在全局代码里写些什么啊？