示图
VB各种进度条
VB编写进度条已经发展很久了,也有很多好方法。VB自带的进度条很难看,一般不用,要用的话,代码如下:Private Sub Command1_Click()Dim counter As IntegerDim workarea(25000) As StringProgressBar1.Min = LBound(workarea)ProgressBar1.Max = UBound(workarea)P...
VB编写进度条已经发展很久了,也有很多好方法。VB自带的进度条很难看,一般不用,要用的话,代码如下:Private Sub Command1_Click()Dim counter As IntegerDim workarea(25000) As StringProgressBar1.Min = LBound(workarea)ProgressBar1.Max = UBound(workarea)P...