Wie gleichzeitige Soundeffekte in VB machen
VB, die neueste Version von Visual Basic hat eine SoundPlayer-Klasse, die Ihre VB-Anwendung die Möglichkeit gibt für die Audiowiedergabe. Diese Klasse erzeugt leider nur ein Sound zu einem Zeitpunkt. Wenn Ihr Programm benötigt mehrere Sounds oder Sound-Effekte gleichzeitig zu spielen, können nicht Sie die SoundPlayer-Klasse als audio-Quelle verwenden. Mit einem einfachen COM-Trick, können jedoch Sie mehrere unsichtbare Windows Media Player-Steuerelemente Ihrer Anwendung hinzufügen, die spielen so viele gleichzeitige Soundeffekte wie Sie wollen.
.
Anweisungen
1 Starten Sie Microsoft Visual Studio, "Datei" klicken Sie auf "Neu." Klicken Sie auf "Projekt", und klicken Sie dann auf "Visual Basic", um es zu markieren. Doppelklicken Sie auf "Windows Forms-Anwendung" erstellen Sie ein neues VB-Projekt. Die Datei mit dem Namen "Form1.vb" erscheint im Projektmappen-Explorer. Das Formular selbst wird im Design-Fenster auf der linken Seite des Projektmappen-Explorers.
2 Klicken Sie auf "Ansicht" und dann auf "Toolbox", um Visual Studio-Toolbox zu öffnen. Klicken Sie mit der rechten Maustaste in die Toolbox, und klicken Sie dann "Elemente hinzufügen", um das Fenster "Toolboxelemente auswählen" zu öffnen.
3 Klicken Sie unter "COM-Komponenten" aktivieren Sie das Kontrollkästchen "Windows Media Player", um dort ein Häkchen zu setzen. Klicken Sie auf "OK", und Visual Studio fügt ein neues "Windows Media Player"-Steuerelement der Toolbox hinzu.
4 Doppelklicken Sie auf das Steuerelement, um es zu Ihrem Formular hinzufügen. Maustaste auf das Steuerelement, das Sie dem Formular hinzugefügt, dann auf "Kopieren". Maustaste auf einen leeren Bereich auf dem Formular und klicken Sie auf "Einfügen." Visual Studio speichert eine Kopie von Windows Media Player-Steuerelement auf dem Formular.
5 Doppelklicken Sie auf die Titelleiste des Formulars. Das Code-Fenster wird geöffnet und zeigt die folgende Methode:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
EndSub
Diese Methode wird beim Laden des Formulars ausgeführt.
6 Fügen Sie den folgenden Code vor der Methode "End Sub"-Anweisung:
Me.AxWindowsMediaPlayer1.Visible = False
Me.AxWindowsMediaPlayer2.Visible = False
Sound1 As String Dim
Sound2 As String Dim
sound1 = "mySound1.wav"
Sound2 = "mySound2.wav"
Me.AxWindowsMediaPlayer1.URL = sound1
Me.AxWindowsMediaPlayer2.URL = sound2
Die ersten beiden Anweisungen verstecken die beiden Windows Media Player-Steuerelemente auf dem Formular. Die nächsten vier Anweisungen definieren "sound1" und "sound2" Variablen. Diese halten die Standorte von sound-Dateien. Ersetzen Sie "mySound1.wav" und "mySound2.wav" mit den Pfadnamen zwei audio-Dateien auf Ihrer Festplatte. Die letzten beiden Anweisungen legen die URL-Eigenschaft der beiden Steuerelemente auf in sound1 und sound2 gespeicherten Werte. Dies bewirkt, dass die Medien Spieler die jeweiligen Sounds gleichzeitig zu spielen.
7 Mit "F5" um das Projekt auszuführen. Das Formular angezeigt wird und die zwei Töne gleichzeitig zu spielen.
Tipps & Warnungen
- Erstellen Sie ein neues Windows Media Player-Steuerelement für jedes Geräusch, das Sie spielen, in Ihrer Anwendung möchten. Der schnellste Weg, dies zu tun ist das erste Steuerelement kopieren und fügen dann eine neue in der Form, wie beschrieben. Visual Studio bietet jedes Steuerelement einen eindeutigen Namen. Jeder Name endet in einer Reihe. Das erste Steuerelement, das es schafft hat einen Namen, der endet in "1". Das zweite Steuerelement Name endet auf "2." Diese Zahlen erhöhen sich um eins, während Sie neue Steuerelemente hinzufügen. Nach dem Erstellen der Windows Media Player-Steuerelemente, legen Sie ihre URL-Eigenschaften, wie gezeigt, um ihre Klänge auslösen.