如何用代码设置系统音量 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有5082人关注过本帖树形打印复制链接主题：如何用代码设置系统音量

有点甜

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2013/8/31 21:15:00 [显示全部帖子]

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

下载信息 [文件大小：下载次数： ]
点击浏览该文件:调节音量.table

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | 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

有点甜

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2013/9/1 23:14:00 [显示全部帖子]

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

下载信息 [文件大小：下载次数： ]
点击浏览该文件:控制主音量.table

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