VB编程中窗体的状态栏的进度条怎么设置?
2个回答
展开全部
通过动态修改value的值可以改变进度条的显示。
假设你有一个timer控件
Timer1.Interval=500
Private Sub Form1_Load()
ProgressBar1.Min=0 '设置最小值
ProgressBar1.Max=100 ‘设置最大值
End Sub
Private Timer1_Timer()
if ProgressBar1.Value=0 then timer1.Enable=False:Exit Sub
ProgressBar1.Value=ProgressBar1.Value+1
End Sub
试试我代码你就懂了!
假设你有一个timer控件
Timer1.Interval=500
Private Sub Form1_Load()
ProgressBar1.Min=0 '设置最小值
ProgressBar1.Max=100 ‘设置最大值
End Sub
Private Timer1_Timer()
if ProgressBar1.Value=0 then timer1.Enable=False:Exit Sub
ProgressBar1.Value=ProgressBar1.Value+1
End Sub
试试我代码你就懂了!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询