VB.NET , den nyeste versjonen av Visual Basic, har en SoundPlayer klasse som gir din VB -programmet muligheten til å spille av lyd . Dessverre er denne klasse produserer kun en lyd om gangen. Hvis programmet trenger å spille flere lyder eller lydeffekter samtidig , kan du ikke bruke SoundPlayer klassen som lydkilde . Ved hjelp av en enkel COM triks, men du kan legge til flere usynlige Windows Media Player-kontrollene til søknaden din som spiller så mange samtidige lyder som du ønsker. . Instruksjoner
en
Launch Microsoft Visual Studio , klikk på "File ", deretter " Ny". Klikk "Project ", og klikk deretter på " Visual Basic" for å markere det . Dobbeltklikk på " Windows Forms Application " for å lage en ny VB.NET prosjekt. Filen heter " Form1.vb " vises i Solution Explorer . Selve skjemaet vises i Design vinduet til venstre for Solution Explorer .
2
Klikk på "View "-knappen , og klikk deretter på " Toolbox " for å åpne Visual Studio verktøykasse . Høyreklikk hvor som helst i verktøykassen , og klikk "Add Items " for å åpne "Choose Toolbox Items "-vinduet.
3
Klikk " COM -komponenter ", deretter klikker du på "Windows Media Player »for å plassere en hake der. Klikk " OK ", og Visual Studio legger til en ny "Windows Media Player" kontrollen til verktøykassen .
4
Dobbeltklikk kontrollen for å legge den i skjemaet. Høyreklikk kontrollen du har lagt til i skjemaet , og klikk " Kopier". Høyreklikk et tomt område på skjemaet , og klikk deretter på "Lim inn. " Visual Studio plasserer en kopi av Windows Media Player kontroll i skjemaet .
5
Dobbeltklikk skjemaet tittellinje. Kode-vinduet åpnes og viser følgende metode : en
Private Sub Form1_Load ( ByVal avsenderen som System.Object , ByVal e Som System.EventArgs ) Håndtak MyBase.Load
End Sub
< p> Denne metoden kjører når skjemaet laster
6
Legg til følgende kode før metodens " End Sub " statement : .
Me.AxWindowsMediaPlayer1.Visible = False
< p> Me.AxWindowsMediaPlayer2.Visible = False
Dim SOUND1 As String
Dim SOUND2 As String
SOUND1 = " mySound1.wav "
SOUND2 = " mySound2.wav "
Me.AxWindowsMediaPlayer1.URL = SOUND1
Me.AxWindowsMediaPlayer2.URL = SOUND2
de to første utsagnene gjem to Windows Media Player styrer på skjema . De neste fire utsagn definere " SOUND1 " og " SOUND2 " variabler . Disse holder plasseringen av lydfilene . Erstatt " mySound1.wav " og " mySound2.wav " med banen navnene på to lydfiler på harddisken din . De to siste setningene definerer URL- egenskapene til de to kontrollene til de verdiene som er lagret i SOUND1 og SOUND2 . Dette fører til at mediespillere for å spille de respektive lyder samtidig .
7
Trykk " F5 " for å kjøre prosjektet . Skjemaet vises og de to lydene spille samtidig .