Kamis, 05 April 2012

Belajar vb Membuat Pemutar mp3


1.Jalankan program VB anda kemudian buat new project dan tetap pilih standar.exe
2. Klik Menu Project >> Components (CTRL+T) kemudian pilih dan tandai Microsoft Common Dialog Control 6.0 dan Microsoft Multimedia Control 6.0 >> OK
3. Lalu tambahkan pada form proyek anda 2 buah label, 2 commandbutton, satu CommonDialog dan MMControl, desainlah seperti dibawah ini dan untuk picture background terserah anda

4. Aturlah properties masing-masing kontrol seperti dibawah ini :

5. kemudian ketikkan kode/listing/script program dibawah ini :

Private Sub Command1_Click()
On Error GoTo loncat
MMControl1.Command = "stop"
CommonDialog1.ShowOpen
MMControl1.FileName = CommonDialog1.FileName
MMControl1.Command = "open"
Label1.Caption = CommonDialog1.FileTitle
loncat:
Exit Sub
End Sub

Private Sub Form_Unload(Cancel As Integer)
MMControl1.Command = "stop"
End Sub

Private Sub Command2_Click()
End
End Sub

6. Save hasil kerja anda dan kemudian silahkan run program anda dengan menekan F5, lalu klik open dan ambil lagu kesayangan anda lalu klik tanda play,,selamat mendengarkan


0 komentar: