1. Buka MS VB dan gunakan Standard Exe
2. klik kanan pada General atau Ctr + T lalu klik Components
3. Centang Microsoft Common Dialog Control 6.0
dan Microsoft Multimedia Control 6.0 lalu tekan OK/Apply
4. Buat MM Control pada form lalu
centang semua propertisnya menjadi true
5. Buat CommonDialog pada form
6. Buat 2 tombol dengan CommandButton
ubah caption menjadi Buka dan Keluar
lalu berinama cmdbuka dan cmdkeluar
7. Buat Label caption nya dikosongkan berinama lbllagu
8. klik ganda pada tombol buka lalu masukan code:
Private Sub cmdbuka_Click()
CommonDialog1.ShowOpen
MMControl1.FileName = CommonDialog1.FileName
MMControl1.Command = "open"
lbllagu.Caption = CommonDialog1.FileTitle
End Sub
9. klik ganda pada tombol keluar lalu masuka code:
Private Sub cmdkeluar_Click()
End
End Sub
10. Untuk menjalankan aplikasi klik star atau tekan F5
11. Untuk merubah aplikasi menjadi exe
klik File lalu Make Project1.exe..
Selesai..
Terima Kasih & Semoga Bermanfaat..
Tutorial by Farid N.A
Twitter: @faridnugraha151
Facebook: faridnugraha51@yahoo.com
Blogger: faridnugraha-amd.blogspot.com
E-mail: faridnugraha.amd@gmail.com
-<< Catatan berguna dikala kita sedang lupa >>-
No comments:
Post a Comment