ToolStrip and StatusStrip

hi guys.. I'm new in VB.net.. so i'm quite confuse about the error from my book.. I have no idea which is the mistake.. I hope any of you can help to explain to me.. THX alot
here is the coding..

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ToolStripStatusLabel1.Text = "Multimedia"
ToolStripStatusLabel2.Text = Format(Now, "dd - mm - yyyy")
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ToolStripStatusLabel2.Text = Format(Now, "hh:mm:ss")
End Sub

Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButtton1.Clicked
Dim kotak_dialog As New OpenFileDialog
kotak_dialog.Filter = "MP3|*.mp3|Wav|*.wav|Dat|*.Dat|Wmp|*.wmp"
kotak_dialog.ShowDialog()
AxWindowsMediaPlayer1.URL = kotak_dialog.FileName

End Sub
End Class

Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories