有人知道怎么这么BT的用progressbar么？

Question

progressbar正常是这样
■■□□□
我想让他这样跑……应该怎么办
□□□■■负值什么的都尝试过了……就是不行……或者说有什么其它控件也行…………谢谢……

Answer 1

放个进度条，满的，上面盖个和窗口一样颜色的Label，Label往左撤就行了。

Answer 2

在窗口上面加一个Timer定时器，Interval属性设置为300或更少。'代码
Option ExplicitDim m_intValue As LongPrivate Sub Form_Load()
    ProgressBar1.Max = 500
    ProgressBar1.Value = 500
    m_intValue = 500
End SubPrivate Sub Timer1_Timer()
    m_intValue = m_intValue - 50
    If m_intValue = 0 Then m_intValue = 500
    ProgressBar1.Value = m_intValue
End Sub
天狼工作室
http://www.j2soft.cn/