- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 进度条 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=7758)
-- 发布时间：2010/8/2 20:02:00
-- 进度条
我想做一个表现存盘速度的进度条,进度条的最大值,最小值及当前植怎么设定呢?
此主题相关图片如下：未命名.jpg
-- 发布时间：2010/8/2 21:00:00
--
现在存盘速度这么快，搞这个好象没有必要。
Dim p As WinForm.ProgressBar
p = e.Form.Controls("ProgressBar1")
p.Maximum = DataTables.Count \'设置最大值
p.Minimum = 0 \'设置最小值
Dim i As Integer
For Each dt As datatable In DataTables
dt.Save()
i = i + 1
p.Value = i \'设置当前值
Next