Ako používať MMControl v jazyku Visual Basic

Microsoft Multimedia Control , alebo MMControl , je Visual Basic nástroj , ktorý prehráva multimediálne súbory . Nenájdete MMControl byť jedným z východiskových nástrojov v paneli nástrojov , ale môžete ho pridať do svojho zoznamu kontrol sa zoznamu súčasti . Môžete pridať MMControl , takže si môžete integrovať audio alebo video súbory do projektu . Avšak , MMControl prijíma iba jeden súbor naraz , takže ak si chcete vytvoriť svoj ​​vlastný MP3 prehrávač , budete musieť použiť pole pre ukladanie zoznamu skladieb . Pokyny dovolená 1

Otvorte projekt aplikácie Visual Basic . Kliknite na " projekt " z menu , a vyberte " súčasti " . Prejdite nadol na " Microsoft Multimedia Control 6.0 , " a dvakrát kliknite na neho pridať políčko na výber . Kliknite na tlačidlo " OK " zatvorte okno súčasti . To pridáva MMControl na paneli nástrojov.
2

Dvakrát kliknite na MMControl nástroj v paneli nástrojov pridať jeden do formulára . Kliknite a pretiahnite ovládací prvok do bodu na formulár , kde ju budete potrebovať .
3

Otvorte okno kód . Zadajte " Dim Tracklist ( 4 ) As String " na vrchole . Tým sa vytvorí pole , ktoré bude obsahovať päť skladieb ( číselná nula až štyri ) . Zadajte " Dim číslo_stopy As Integer " vytvoriť premenné počítadlá.
4

Otvorte " Form_Load ( ) " funkcie . Zadajte " tracklist ( 0 ) = file_path " načítať prvú stopu do poľa , kde " file_path " je aktuálne umiestnenie MP3 súboru na vašom počítači . Urob to znova " track ( List ( 1 ) " až " Tracklist ( 4 ) . "
5

Typ " MMControl1.Command = " Otvoriť " " v " Form_Load ( ) " funkcie pre otvorenie zariadení , keď sa program spustí . Typ " číslo_stopy = 0 " na ďalší riadok a " MMControl1.FileName = Tracklist ( číslo_stopy ) " na riadku po tom . Zadajte " MMControl.Command = " Play " na poslednom riadku vo funkcii .
6

Otvorte funkciu " Form_Unload " a zadajte " MMControl.Command = " Zatvoriť " " pre zastavenie konania, ak váš program končí .
7

Otvorte . Funkcia " MMControl1_NextClick " Zadajte nasledujúce riadky :

MMControl1.Command = " Zastaviť "

Ak číslo_stopy = 4 Potom

číslo_stopy = 0

Else

číslo_stopy = číslo_stopy + 1

End If

MMControl1.FileName = zoznam ( číslo_stopy )

MMControl1.Command = " Otvoriť "

MMControl1.Command = " Play "
8

Otvorte funkciu " MMControl1_PrevClick " Zadajte nasledujúce riadky : .

MMControl1.Command = " Zastaviť "

ak číslo_stopy = 0 Then

číslo_stopy = 4

Else

číslo_stopy = číslo_stopy - 1

End If

MMControl1.FileName = zoznam ( číslo_stopy )

MMControl1.Command = " Otvoriť "

MMControl1.Command = " Play "
9

Stlačte " F5 " spustiť program a počúvať vašich MP3 .

• Predchádzajúca strana: Ako upraviť v GridView 
• Ďalšia strana: Ako si vyrobiť mriežky Formuláre