SOURCE CODING MP3 PALYER by Lhourens
Tutorial Source Coding Visual Basic... Private Sub aku_Click() About_Me.Show End Sub Private Sub Apps_Click() MsgBox "UTARI SEPTIANI UMI , Depok City © CopyLeft BSI 2012" MsgBox "(Install Shockwave Flash Terlebih Dahulu)" End Sub Private Sub check_Click() Shell "C:\Mp3 Player\Tari_Mp3\snd.bat" End Sub Private Sub Command1_Click() ShockwaveFlash1.Movie = "StopPlay" ShockwaveFlash1.Movie = App.Path & "\Shockwave Object\Photo slideshow.swf" End Sub Private Sub Command2_Click() ShockwaveFlash1.Movie = "StopPlay" ShockwaveFlash1.Movie = App.Path & "\Shockwave Object\Visual1.swf" End Sub Private Sub Command3_Click() ShockwaveFlash1.Movie = "StopPlay" ShockwaveFlash1.Movie = App.Path & "\Shockwave Object\BSI_ID.swf" End Sub Private Sub Form_Load() MMControl2.BackVisible = False MMControl2.EjectVisible = False MMControl2.RecordVisible = False MMControl2.StepV