Dim p As WinForm.ProgressBar = e.Form.Controls("ProgressBar1")
p.Maximum = 86400 '设置最大值
p.Minimum = 0 '设置最小值
p.Value = 0 '设置当前值
Dim D As Date = Date.Now
Dim a As Integer
a = d.Hour * 3600 + d.Minute*60 +d.Second
p.Value = a
目的 :把进度条 按1天24小时 细分 用来描绘时间进度。
请教, 以上的代码 我放在定时器上 每分钟 执行一次啊, 每次都从新描绘。 不好看。。。。
有没方法 让他 不重新描绘,而是直接 一点点 叠加上去。