一种解决方法是使用Windows Media Player控件。添加一个到您的表格每个您需要的轨道。将Visible()属性设置为false,以便在窗体上看不到它们。
这里我设置一个声音在后台连续播放,而其他大干快上的第一个顶部出场:
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim warp As String = "C:\Users\Mike\Documents\Star Trek Sound FX\warpdrv.wav"
AxWindowsMediaPlayer1.settings.setMode("Loop", True)
AxWindowsMediaPlayer1.URL = warp
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim intercom As String = "C:\Users\Mike\Documents\Star Trek Sound FX\tos-intercom.wav"
AxWindowsMediaPlayer2.URL = intercom
End Sub
你应该张贴您的代码的相关部分。 – Magnilex 2014-12-02 19:32:19