VB6“正在登录”进度条如何做的？
VB6“正在登录”进度条如何做的？
日期：2007-11-22 11:16:19 人气：1
提供两种思路：第一种是模仿X-SCAN的进度条的，不过稍有逊色：
'添加一个Timer，Interval设为1
'一个PictureBox，名称是P1 ??TZW
Dim d As Single
Private Sub Form_Load()
d = P1.Width / 255
P1.AutoRedraw=True
End Sub
Private Sub Timer1_Timer()
Static c As Long