vb代码 调用两个以上声音,该怎么处理

vb代码 调用两个以上声音
我想实现调用 事先录好的几段音频。比如要实现“1号车报警”、“2号车报警”声音；我已把文字“1”、“2”、“号车报警”均录成单个音频（1.wav,2.wav,alarm.wav等文件）。
我现在希望的是能帮忙给个简单的例子，怎么能通过编程，比如点击command按钮，就能将1.wav和alarm.wav连着播放出来，实现“1 号车报警”的声音效果

------解决方案--------------------
将文件名按先后次序放在数组中，先用 Multimedia MCI 控件播放第一个，它有 PlayCompleted 事件，在这里继续播放下一个。
------解决方案--------------------
应该用 SND_SYNC 参数吧，播放完以后返回。
------解决方案--------------------
播放第一个后你必需延迟 否则马上被第二个中断

PlayVoice (VoiceDisk & "1号车报警.wav")
Call DelayCycle2(1000) '因为.wav时间是固定的 你可以试下需多久时间再改一下
PlayVoice (VoiceDisk & "2号车报警.wav")


'这个副程序摆在 .bas 所有地方都可全局调用
Public Declare Function GetTickCount Lib "kernel32" () As Long
Public Sub DelayCycle(Optional Dtm As Long)
Dim Stm&
On Error Resume Next
Stm = GetTickCount
Do
DoEvents
If ExitProg Then Exit Do
Loop Until GetTickCount >= Stm + Dtm
End Sub