7,788
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
flyingscv 2003-12-27
- 打赏
- 举报
当然可以
slider改变时利用以上各位的就行了啊
slider改变时利用以上各位的就行了啊
chillr 2003-12-27
- 打赏
- 举报
能不能通过Slider控件来达到效果啊？（我对这个控件不熟）
xfzzf 2003-12-27
- 打赏
- 举报
可以吧。splider改变的值做为api的参数不就行了么?
shortppsy 2003-12-27
- 打赏
- 举报
slider来调用MCI
captainivy 2003-12-26
- 打赏
- 举报
同意楼上
danielinbiti 2003-12-26
- 打赏
- 举报
api
Private Declare Function waveOutSetVolume Lib "Winmm" (ByVal wDeviceID As Integer, ByVal dwVolume As Long) As Integer
Private Declare Function waveOutGetVolume Lib "Winmm" (ByVal wDeviceID As Integer, dwVolume As Long) As Integer
Private Declare Function waveOutSetVolume Lib "Winmm" (ByVal wDeviceID As Integer, ByVal dwVolume As Long) As Integer
Private Declare Function waveOutGetVolume Lib "Winmm" (ByVal wDeviceID As Integer, dwVolume As Long) As Integer
踏平扶桑 2003-12-26
- 打赏
- 举报
用mcisendstring "set setaudio volume to 声音大小(好像是0--1000）"
chillr 2003-12-26
- 打赏
- 举报
谢谢，有没有另外的方法啊？我刚学VB，你说的我还不懂啊
LanceJin 2003-12-26
- 打赏
- 举报
shell隐式调用SNDVOL32.EXE，再向它发控制消息。
