急!!! !!!VB中如何设定声音啊?就例如按了某个按钮判断对错,对就这声音,错就那声音,怎么调啊!?
3个回答
展开全部
用API的PlaySound函数
通用
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Private Sub Command1_Click()
If 对的条件 Then
playwavefile = PlaySound("声音文件名.wav", 0&, lngflags)
ElseIf 错的条件 Then
playwavefile = PlaySound("另一个声音文件名.wav", 0&, lngflags)
End If
End Sub
(声音文件必须是WAV格式,你可以用软件转换格式)
通用
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Private Sub Command1_Click()
If 对的条件 Then
playwavefile = PlaySound("声音文件名.wav", 0&, lngflags)
ElseIf 错的条件 Then
playwavefile = PlaySound("另一个声音文件名.wav", 0&, lngflags)
End If
End Sub
(声音文件必须是WAV格式,你可以用软件转换格式)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
要例子就加425015154
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询