Status Bar

[Anonymous]

Just wondering how do I get the status bar in my program to tell the user
what is happening?
I'm creating a small media player and I want the status bar to tell me the
time of the file (how much has played / how much is left) and tell me the
filename. here is my code

Private Sub cmdOpen_Click()

dlgPlayer.FileN ame = ""
dlgPlayer.ShowO pen
Open dlgPlayer.FileN ame For Input As 1
WindowsMediaPla yer1.URL = dlgPlayer.FileN ame
Close 1
End Sub

as you can see I haven't got a clue of what to do with the statusbar with of
course isn't listed, i figured I could put it in between the 'Open
dlgPlayer' and the 'Close 1" but I have no idea the property that I'm
changing
Please HELP?!
Thanx

[Anonymous]

Re: Status Bar

ok now I got something better but it still doesn't display anything in the
status bar
here it is

Private Sub WindowsMediaPla yer1_OpenStateC hange(ByVal NewState As Long)
StatusBar1.Simp leText = WindowsMediaPla yer1.Status
End Sub
someone help

"Anonymous" <john@hey.comwr ote in message
news:m%gZg.2768 9$P7.13286@edtn ps89...

Just wondering how do I get the status bar in my program to tell the user
what is happening?
I'm creating a small media player and I want the status bar to tell me the
time of the file (how much has played / how much is left) and tell me the
filename. here is my code
>
Private Sub cmdOpen_Click()
>
dlgPlayer.FileN ame = ""
dlgPlayer.ShowO pen
Open dlgPlayer.FileN ame For Input As 1
WindowsMediaPla yer1.URL = dlgPlayer.FileN ame
Close 1
End Sub
>
as you can see I haven't got a clue of what to do with the statusbar with
of course isn't listed, i figured I could put it in between the 'Open
dlgPlayer' and the 'Close 1" but I have no idea the property that I'm
changing
Please HELP?!
Thanx
>
>