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

1楼

puyouliang 发表于：2011/5/10 8:37:00

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

2楼

狐狸爸爸 发表于：2011/5/10 8:46:00

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)

3楼

puyouliang 发表于：2011/5/10 9:57:00

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

        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

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

4楼

狐狸爸爸 发表于：2011/5/10 10:19:00

看这个：

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

共4 条记录, 每页显示 10 条, 页签: [1]