以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]窗口中新增进度条  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=120102)
--  作者：chnfo
--  发布时间：2018/6/7 10:18:00
--  [求助]窗口中新增进度条
    Dim p As WinForm.ProgressBar
    p = e.Form.CreateControl("PB", ControlTypeEnum.ProgressBar)
    p.width = 300
    p.height = 20
    p.Top =     ？  \'--------------如何让这个进度条在窗口中居中
    p.left =      ？  \'--------------如何让这个进度条在窗口中居中
    e.Form.AddControl(p)
    p.Visible = True

另外，做了
for i as integer = 0 to 100
p.value  = i    \'实际执行的时候，进度条不动。单独做一个窗口就可以，不知为何在我的另一个窗口中不动
next
[此贴子已经被作者于2018/6/7 10:21:07编辑过]
--  作者：有点甜
--  发布时间：2018/6/7 10:40:00
--  

1、

 

p.left = (e.form.width-p.width) / 2

 

2、看看

 

http://www.foxtable.com/webhelp/scr/1476.htm