主题：[求助]面页合集中是否能动态增加控件

我想在一个面页合集中动态增加一个进度条的控件，请问老师怎样写啊

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim prb As WinForm.ProgressBar
prb = e.Form.CreateControl("pbar1", ControlTypeEnum.ProgressBar)
prb.Left = 20
prb.Top = 20
prb.Value = 10
tab.TabPages(0).AddControl(prb)

我在里面又加了个字符控件

        Dim tishi As WinForm.Label
        tishi = e.Form.CreateControl("进度", ControlTypeEnum.Label)
        tishi.text = "正在导入"
        tishi.Left = 50
        tishi.Top = 130
        tab.TabPages(3).AddControl(tishi)
在循环中加入了：

tishi.text = tishi.text & cmxh

 

为什么执行过程中不刷新，而且只在执行完后才显示啊，循环的时候一直不显示。

看这个：

 

http://help.foxtable.com/topics/1476.htm