einschließlich 2 Sound für Konsolenanwendung (vb.net)

Question

Ich mache ein einfaches Spiel wie Space Invader mit Microsoft Visual Basic 2010 (console.application). Ich versuche, 1 Hintergrundmusik und ein anderes als Soundeffekt für das Schießen, Kollision und usw. zu machen, um zusammen zu arbeiten. Bisher habe ich es geschafft, dass es funktioniert, indem ich die folgenden Befehle kombiniere. Allerdings fehlen den Soundeffekten sicherlich die Variationen. Gibt es also bessere Tipps, um den aktuellen Zustand zu verbessern? Vielen Dank.

(Hintergrundmusik)

My.Computer.Audio.Play ("Game_Song.wav", AudioPlayMode.BackgroundLoop)

(Sound-Effekt)

My.Computer.Audio.PlaySystemSound (System.Media.SystemSounds.Asterisk) oder console.beep

Answer 1

Sie können eine Zufallszahl verwenden, um den Wiedergabeton auszuwählen. Pseudocode würde so aussehen:

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) 
}