- Jalankan program VB anda kemudian buat new project dan tetap pilih standar.exe
- Klik Menu Project >> Components (CTRL+T) kemudian pilih dan tandai Microsoft Common Dialog Control 6.0 dan Microsoft Multimedia Control 6.0 >> OK
- 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
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