Foxtable(狐表)用户栏目专家坐堂 → 如何用代码设置系统音量


  共有5014人关注过本帖树形打印复制链接

主题:如何用代码设置系统音量

帅哥哟,离线,有人找我吗?
明丰
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:558 积分:4352 威望:0 精华:2 注册:2011/4/18 8:27:00
如何用代码设置系统音量  发帖心情 Post By:2013/8/31 17:47:00 [只看该作者]

waveOutGetVolume() 、waveOutSetVolume 函數可以获得和设置系统音量,请问如何设置?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/8/31 17:59:00 [只看该作者]

你参考一下做吧http://www.foxtable.com/help/topics/1937.htm

百度一下WINDOWS 音量API

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/8/31 21:15:00 [只看该作者]

 做了个例子,可以控制音量的。代码来自网络。

 
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:调节音量.table


 回到顶部
帅哥哟,离线,有人找我吗?
明丰
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:558 积分:4352 威望:0 精华:2 注册:2011/4/18 8:27:00
  发帖心情 Post By:2013/8/31 21:34:00 [只看该作者]

先谢谢!

[此贴子已经被作者于2013-8-31 21:35:49编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By: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

 回到顶部
帅哥哟,离线,有人找我吗?
明丰
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:558 积分:4352 威望:0 精华:2 注册:2011/4/18 8:27:00
  发帖心情 Post By:2013/9/1 9:08:00 [只看该作者]

“有点甜”的代码用于设置 波形音量,如果希望控制 主音量 该如何设置?

 

打开系统主音量设置窗口:

shell("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,0")'声音和音频设备属性
Sendkeys.Send("%v")

 

 

 


图片点击可在新窗口打开查看此主题相关图片如下:音量.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/9/1 23:14:00 [只看该作者]

 可以操作主音量的。如下例子

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:控制主音量.table



 回到顶部
帅哥哟,离线,有人找我吗?
明丰
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:558 积分:4352 威望:0 精华:2 注册:2011/4/18 8:27:00
  发帖心情 Post By:2013/9/2 6:35:00 [只看该作者]

非常感谢!

 回到顶部
帅哥哟,离线,有人找我吗?
ztmdnzc
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:501 积分:4167 威望:0 精华:0 注册:2013/1/18 13:34:00
  发帖心情 Post By:2013/12/31 23:51:00 [只看该作者]

甜老师:把Sendkeys.Send("%v")去掉则打不开主音量控制?%v是什么意思?谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
yellow
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:256 积分:2880 威望:0 精华:0 注册:2014/12/24 9:51:00
  发帖心情 Post By:2021/12/30 13:14:00 [只看该作者]

太强,爱死狐表了!图片点击可在新窗口打开查看
那请问,如果我想直接给定音量值的方式控制音量。应该在全局代码里写些什么啊?

 回到顶部