VC驿站

 找回密码
 加入驿站

QQ登录

只需一步,快速开始

搜索
查看: 378|回复: 7

[求助] 我就想写个VC,设置电脑静音与恢复音量或者请帮忙把这个VB改成VC,谢谢

[复制链接]
75_avatar_middle
在线会员 发表于 2019-1-30 21:29:17 | 显示全部楼层 |阅读模式
3驿站币
Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" ( _
     ByVal hwnd As Long, _
     ByVal wMsg As Long, _
     ByVal wParam As Long, _
     ByVal lParam As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
  
Private Const WM_APPCOMMAND As Long = &H319
Private Const APPCOMMAND_VOLUME_UP As Long = 10
Private Const APPCOMMAND_VOLUME_DOWN As Long = 9
Private Const APPCOMMAND_VOLUME_MUTE As Long = 8

Dim hwnd As Long

Private Sub CommandButton1_Click()
    '音量增加
    SendMessage hwnd, WM_APPCOMMAND, &H30292, APPCOMMAND_VOLUME_UP * &H10000

End Sub

Private Sub CommandButton2_Click()
    '音量减少
    SendMessage hwnd, WM_APPCOMMAND, &H30292, APPCOMMAND_VOLUME_DOWN * &H10000

End Sub

Private Sub CommandButton3_Click()
    '静音
    SendMessage hwnd, WM_APPCOMMAND, &H200EB0, APPCOMMAND_VOLUME_MUTE * &H10000
End Sub
我就想写个VC,设置电脑静音与恢复音量,但我不知道VC咋写,谢谢

最佳答案

查看完整内容

这个不难,给你找了点资料: 编程快速实现调节系统主音量的方法 不需要调用什么特殊的API函数,只需要对自己的窗口函数发送一个消息并把该消息交给系统处理就行了。而发送的按键信息就是大家一般在USB外接键盘上面看到到那种专业键,比如音量加,音量减,静音,上一曲,下一曲,播放与暂停。 实现方法: 音量静音:MAKELPARAM(0, FAPPCOMMAND_KEY




上一篇:急!急!急!请问输出控制台一直输出后等数据满了会奔溃,有什么好的方法解决吗
下一篇:请问多级指针的一个问题
77_avatar_middle
online_vip 发表于 2019-1-30 21:29:18 | 显示全部楼层
这个不难,给你找了点资料:

编程快速实现调节系统主音量的方法

    不需要调用什么特殊的API函数,只需要对自己的窗口函数发送一个消息并把该消息交给系统处理就行了。而发送的按键信息就是大家一般在USB外接键盘上面看到到那种专业键,比如音量加,音量减,静音,上一曲,下一曲,播放与暂停。

实现方法:
    音量静音:MAKELPARAM(0, FAPPCOMMAND_KEY<<12|APPCOMMAND_VOLUME_MUTE);
    音量增加:MAKELPARAM(0, FAPPCOMMAND_KEY<<12|APPCOMMAND_VOLUME_UP);
    音量减少:MAKELPARAM(0, FAPPCOMMAND_KEY<<12|APPCOMMAND_VOLUME_DOWN);

最后调用SendMessage就可以了:
    SendMessage(hWnd, WM_APPCOMMAND, 0, [上面的一个值]);

点评

这个代码解决了我的问题,但就缺少一个判断,判断静音时则恢复静音,判断不是静音时则设置为静音  发表于 2019-2-12 08:55

评分

参与人数 1驿站币 +2 热心值 +2 收起 理由
58_avatar_small 敏敏 + 2 + 2 受教了!

查看全部评分

10_avatar_middle
在线会员 发表于 2019-1-31 08:16:32 | 显示全部楼层
加个热键,完美我就想写个VC,设置电脑静音与恢复音量或者请帮忙把这个VB改成VC,谢谢
75_avatar_middle
ico_lz  楼主| 发表于 2019-1-31 09:23:53 | 显示全部楼层
Health 发表于 2019-1-30 21:47
这个不难,给你找了点资料:

编程快速实现调节系统主音量的方法

谢谢,我遇到一个问题
当我写这个入程序时    ::SendMessage(m_hWnd, WM_APPCOMMAND, 0, MAKELPARAM(0, FAPPCOMMAND_KEY<<12|APPCOMMAND_VOLUME_MUTE));
则会提示出错:
'WM_APPCOMMAND' : undeclared identifier
'FAPPCOMMAND_KEY' : undeclared identifier
'APPCOMMAND_VOLUME_MUTE' : undeclared identifier
昨天我用VC写时也遇到这个问题,请如何解决?

如果我想做一个判断,如果静音则恢复音量,如果不静音则跳过,这个要如何写?谢谢
29_avatar_middle
在线会员 发表于 2019-2-7 17:43:07 | 显示全部楼层
翻看精易模块,转成C++的,不就行了?
75_avatar_middle
ico_lz  楼主| 发表于 2019-2-11 21:20:36 | 显示全部楼层
ntddk 发表于 2019-2-7 17:43
翻看精易模块,转成C++的,不就行了?

我想做一个判断,如果静音则恢复音量,如果不静音则跳过,这个要如何写?谢谢
75_avatar_middle
ico_lz  楼主| 发表于 2019-2-11 21:21:53 | 显示全部楼层
Health 发表于 2019-1-30 21:47
这个不难,给你找了点资料:

编程快速实现调节系统主音量的方法

我想做一个判断,如果静音则恢复音量,如果不静音则跳过,这个要如何写?谢谢
您需要登录后才可以回帖 登录 | 加入驿站 qq_login

本版积分规则

关闭

站长提醒上一条 /2 下一条

QQ|小黑屋|手机版|VC驿站 ( 辽ICP备09019393号tongdun|网站地图wx_jqr

GMT+8, 2019-2-20 02:06

Powered by Discuz! X3.4

© 2009-2019 cctry.com

快速回复 返回顶部 返回列表