VB 6.0圆形旋转风格的进度条指示控件的实现

想要用代码在VB6.0中实现类似迅雷的圆形旋转风格的进度条指示控件，并且可以用数字显示进度

可以使用第三方控件，看上去会美观一点。