ProgressBar控件怎么应用？

[希默软件]

控件如下：
<OBJECT ID="ProgressBar1" WIDTH=100 HEIGHT=51
CLASSID="CLSID:35053A22-8589-11D1-B16A-00C0F0283628">
<PARAM NAME="_ExtentX" VALUE="2646">
<PARAM NAME="_ExtentY" VALUE="1323">
<PARAM NAME="_Version" VALUE="393216">
<PARAM NAME="Appearance" VALUE="1">
</OBJECT>

这是我用ActiveX Control Pad找出来的，但是不知道怎么用，请大家帮忙。谢谢！

[blues-star]

<P>
<OBJECT id=pb style="LEFT: 0px; WIDTH: 391px; TOP: 0px; HEIGHT: 50px" height=50
width=391 classid="clsid:0713E8D2-850A-101B-AFC0-4210102A8DA7" VIEWASTEXT>
<PARAM NAME="_ExtentX" VALUE="10345">
<PARAM NAME="_ExtentY" VALUE="1323">
<PARAM NAME="_Version" VALUE="327682">
<PARAM NAME="BorderStyle" VALUE="0">
<PARAM NAME="Appearance" VALUE="1">
<PARAM NAME="MousePointer" VALUE="0">
<PARAM NAME="Enabled" VALUE="1">
<PARAM NAME="OLEDropMode" VALUE="0">
<PARAM NAME="Min" VALUE="0">
<PARAM NAME="Max" VALUE="100"></OBJECT>
</P>

<script>

var counter = 0;

function pro()
{
if (counter<100)
{
counter++;
pb.Value = counter;
setTimeout("pro()",100);
}
else
{
alert("progress end");
}
}
pro();
</script>

[blues-star]

classid不是一个？疏忽，不过刚刚我看了，你那个也是这么用的。