vb.net - VB播放随机声音的WAV文件

Question

我如何在vb中播放随机声音，我想在使用应用程序时在后台随机播放3个wave文件？

这就是我只播放一首歌的方式。

My.Computer.Audio.Play(My.Resources.music1, AudioPlayMode.Background)

Answer 1

您可以执行以下操作:

Public Sub PlayRandomTrack()

    Dim trackNum As Integer = CInt(Rnd() * 3 + 0.5)

    Select Case trackNum

        Case 1
            My.Computer.Audio.Play(My.Resources.music1, AudioPlayMode.Background)

        Case 2
            My.Computer.Audio.Play(My.Resources.music2, AudioPlayMode.Background)

        Case Else
            My.Computer.Audio.Play(My.Resources.music3, AudioPlayMode.Background)

    End Select

End Sub

希望这可以帮助。