其实这个很简单,直接有Windows media player控件播放音频就OK了,上面控制按钮一应俱全!!!
PPTREN 发表于 2008-5-30 07:27:03
不用这么麻烦,让动感老师写个宏,直接调用即可.
猎狼鹰 发表于 2008-5-30 09:52:10
有没有必要这么麻烦,直接调节音箱的音量控制钮不是更方便吗?
laose 发表于 2008-6-01 10:49:48
用VBA来实现,方法如下:
在幻灯片中插入按钮(修改为"音量控制"),双击按钮写入如下代码:
Dim a As Integer
a = Shell("c:\windows\System32\rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl", vbNormalNoFocus)
QUOTE:
那好象太奢望了吧,再看吧.注销一次就会生效,
导入清除中的注册表,注销一次,就会清除功能,绿色!!!!!!!
而且不占资源,不会提示,不是vba,
等于键盘具备笔记本键盘快捷键的功能,任何程序中都会有效果
不信,你播放一个音乐试试,哈哈
如果你把托盘中的小喇叭打开,再分别按那两个键,就会发现................呀,那个块在动......
没人识货,我删除了:(
[ 本帖最后由 lcyjxjs 于 2008-5-31 22:33 编辑 ]
[ 本帖最后由 gchh 于 2008-5-24 18:23 编辑 ]
QUOTE:
同志,你这个简单,但不能使用啊.按Scrolllock无反应,按Home会回到首页呀
而且无论运行什么时候,永远有效果,不信,你播放一个音乐试试,哈哈
如果你把托盘中的小喇叭打开,再分别按那两个键,就会发现................
不过,楼主对系统研究也是很深入的!:D
[ 本帖最后由 lcyjxjs 于 2008-5-28 11:56 编辑 ]
在幻灯片中插入按钮(修改为"音量控制"),双击按钮写入如下代码:
Dim a As Integer
a = Shell("c:\windows\System32\rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl", vbNormalNoFocus)
不过老师的vba真的很厉害
可惜,老师没试验过我的办法,因为没人识货,已经删除了!
我的代码如下,保存为 .reg,双击导入,注销一次就行了,不占资源
任何程序运行中,只要按Scrolllock 就会增大音量,按Home会减少音量
Windows Registry Editor Version 5.00
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Keyboard Layout]
"Scancode Map"=hex:00,00,00,00,00,00,00,00,03,00,00,00,30,E0,46,00,2E,E0,47,E0,00,00,00,00
[ 本帖最后由 lcyjxjs 于 2008-6-2 13:51 编辑 ]
怎么都这么强呢