播放器的进度条怎么制作呢

播放器的进度条如何制作呢？
想问一下播放器的进度条如何制作？ 我的项目中 引入 windows media player控件 因为特殊需求 WMP的控制台被隐藏掉 所以没有播放进度条，我现在的目的是想做一个播放器的进度条 实现这个用什么控件呢？ 怎么实现 求思路，谢谢。

[解决办法]

VB code

Private Sub Form_Load()    HScroll1.Min = 0    HScroll1.Max = 100    End SubPrivate Sub HScroll1_Change()    Text1.Text = HScroll1.Value    End Sub
[解决办法]
a)HScroll 为 VB 自带控件，安装完整版
b)用  Microsoft Windows Common Controls 6.0 (SP6) 中的 Slider 控件