包括2个声音用于控制台应用程序（vb.net）

Question

我正在使用microsoft visual basic 2010（console.application）制作一个像太空入侵者一样简单的游戏。我正在尝试制作1个背景音乐和另一个作为拍摄，碰撞等声音效果一起工作。到目前为止，我设法通过结合以下命令使其工作。但是，声音效果肯定没有变化。因此，有没有更好的提示，以改善当前状态？谢谢。

（背景音乐）

My.Computer.Audio.Play（“Game_Song.wav”，AudioPlayMode.BackgroundLoop）

（音效）

My.Computer.Audio.PlaySystemSound（System.Media.SystemSounds.Asterisk） 或者console.beep

Answer 1

您可以使用随机数选择播放声音。伪代码看起来像这样：

Dim Generator As System.Random = New System.Random()

' Get a random number >= MyMin and <= MyMax
Dim random_number = Generator.Next(1, 3)

if (random_number = 1){
    My.Computer.Audio.PlaySystemSound(console.beep)
} else if (random_number = 2){
    My.Computer.Audio.PlaySystemSound(System.Media.SystemSounds.Asterisk)
} else {
    My.Computer.Audio.PlaySystemSound(System.Media.SystemSounds.Comma)
}