untuk design dari mp3 player menggunakan vb net
dan codingan dari aplikasi mp3 player
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
btnplay.Image = My.Resources.play
btnplay.Text = "1"
End Sub
Private Sub btnplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnplay.Click
If btnplay.Text = "1" Then
btnplay.Image = My.Resources.pause
btnplay.Text = "0"
asplayer.Ctlcontrols.play()
ElseIf btnplay.Text = "0" Then
btnplay.Image = My.Resources.play
btnplay.Text = "1"
asplayer.Ctlcontrols.pause()
End If
End Sub
Private Sub btnstop_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnstop.Click
btnplay.Image = My.Resources.play
btnplay.Text = "1"
asplayer.Ctlcontrols.stop()
End Sub
Private Sub btnpilih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnpilih.Click
OpenFileDialog1.ShowDialog()
OpenFileDialog1.Filter = "MP3 File(*.mp3)|*.mp3"
asplayer.URL = OpenFileDialog1.FileName
asplayer.Ctlcontrols.play()
btnplay.Image = My.Resources.pause
btnplay.Text = "0"
lblagu.Text = asplayer.currentMedia.name
End Sub
End Class
jika kalian ingin lebih paham lagi mengenai pembuatan aplikasi mp3 player ini bisa anda lihat video tutorial dari saya.
anda juga bisa mendownload aplikasi mp3 player ini di link https://www.mediafire.com/?o7a0i87pk446nsv
dan bisa download source code nya di link https://www.mediafire.com/?03yx0483vdip93r
saya teguh dumadi semoga bermanfaat.
1 comments:
bang mau tanya, cara nya kirim sms otomatis berdasarkan jadwal yang sudah ditentukan gimana ya?
Replysaya pakai visual studio 2012
mohon bantuannya ya gan..
Post a Comment