bagaimana cara buat media player classic
siapkan vb portable versi 6.0 ( download ) klik "Visual Basic 6 Portable.exe" tinggal klik "run vb6" klik yg ditandai pada form1 buat: 2 Listbox (pada list2 tepatnya dibelakang list1),1 CommandButton ,1 mediaplayer (ctrl+t>browse...>ketik:' msdxm.ocx ' pada 'file name'>open) pada form2 buat: 2 CommandButton ,1 filelistbox ,1 drivelistbox ,1 dirlistbox edit ketikan berikut form properties setting nama 1 Form1 caption Media player Command1 caption add Command2 caption del 2 Form2 caption Add… Command1 caption + Command2 caption x File1 pattern *.mp3;*.mp4;*.flv;*.wmp pada form1 ketik: Private Sub Command2 _Click() List1.Clear MediaPlayer1.Stop End Sub Private Sub Command1 _Click() Form2.Show End Sub Private Sub List1_Click() List2.ListIndex = List1