vb 制作按键音
我需要按下按键后能发出我预定的声音。我一开始用放个播放器控件,当每次按下按键的时候就播放那段声音。但是当两次按键时间间隔小于按键音长度的时候,就会把上一次按键音在还没播放...
我需要按下按键后能发出我预定的声音。我一开始用放个播放器控件,当每次按下按键的时候就播放那段声音。但是当两次按键时间间隔小于按键音长度的时候,就会把上一次按键音在还没播放完的时候停止,直接放下一次的。求高手解决。我不希望是用用多个播放器循环调用的答案。谢谢了。
我需要的是播放我自己做的按键音啊。。。。 展开
我需要的是播放我自己做的按键音啊。。。。 展开
4个回答
展开全部
想全部放完?那用API函数吧,示例:
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" _
(ByVal IpszName As String, ByVal hModule As Long, ByVal dwflags As Long) As Long
Private Sub Text1_KeyPress(KeyAscii As Integer)
Call PlaySound("C:\WINDOWS\Media\chimes.wav", 0&, &H0)
End Sub
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" _
(ByVal IpszName As String, ByVal hModule As Long, ByVal dwflags As Long) As Long
Private Sub Text1_KeyPress(KeyAscii As Integer)
Call PlaySound("C:\WINDOWS\Media\chimes.wav", 0&, &H0)
End Sub
展开全部
试一试用下面语句代替播放器播放系统声:
Beep
Beep
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
我以前曾经做过,我是用另开一个线程播放声音。按键时结束线程生命周期再开个
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
我也在做呢,也遇到问题
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询