VB.NET , l'ultima versione di Visual Basic , ha una classe SoundPlayer che dà l'applicazione VB la capacità di riprodurre l'audio . Purtroppo , questa classe produce un solo suono alla volta . Se il programma ha bisogno di giocare più suoni o effetti sonori , allo stesso tempo , non è possibile utilizzare la classe SoundPlayer come sorgente audio . Usando un semplice trucco COM , tuttavia, è possibile aggiungere più controlli invisibili Windows Media Player per la vostra applicazione che gioco come molti suoni simultanei come si desidera. . Istruzioni
1
lancio di Microsoft Visual Studio , fare clic su " File ", quindi fare clic su " Nuovo ". Fare clic su "Progetto " e quindi su " Visual Basic " per evidenziarlo . Fare doppio clic su " Applicazione Windows Form " per creare un nuovo progetto VB.NET . Il file denominato " Form1.vb " appare in Esplora soluzioni . La forma stessa viene visualizzata nella finestra di progettazione a sinistra del Solution Explorer .
2 Fare clic sul pulsante "Visualizza" , e quindi fare clic su "Casella degli strumenti " per aprire toolbox di Visual Studio . Fare clic destro nella casella degli strumenti , quindi fare clic su "Aggiungi elementi " per aprire la finestra " Scegli elementi della Casella degli strumenti " .
3
Click " di componenti COM ", quindi fare clic su " Windows Media Player " casella di controllo per inserire un segno di spunta lì . Fare clic su " OK ", e Visual Studio aggiunge un nuovo controllo "Windows Media Player" alla casella degli strumenti .
4
doppio clic su tale controllo per aggiungerlo alla vostra forma . Fare clic con il controllo aggiunto al modulo , quindi fare clic su "Copia". Fai clic destro su uno spazio vuoto del modulo e quindi fare clic su "Incolla ". Visual Studio inserisce una copia del controllo di Windows Media Player sul modulo .
5
doppio clic sulla barra del titolo del form . Si apre la finestra del codice e visualizza il seguente metodo :
Private Sub Form1_Load ( ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles MyBase.Load
End Sub
