Foxtable(狐表)用户栏目专家坐堂 → [求助] 动态添加窗口表控件出错误!


  共有1686人关注过本帖平板打印复制链接

主题:[求助] 动态添加窗口表控件出错误!

帅哥哟,离线,有人找我吗?
lmlptj
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:455 积分:3756 威望:0 精华:0 注册:2012/2/8 14:19:00
[求助] 动态添加窗口表控件出错误!  发帖心情 Post By:2016/11/1 18:33:00 [只看该作者]

'第一步:动态增加各字段

Dim PGS As WinForm.TabControl = e.Form.Controls("TabControl2")
pgs.TabPages.Clear

Dim PgText As List(of String) = DataTables("字典").GetValues("字段名称","","_Identify")
For Each pg As String In PgText
    pgs.TabPages.Add(pg,pg)
    Dim t As WinForm.Table = e.Form.CreateTable(pg,"词典",True)
    pgs.TabPages(pg).AddControl(t)
    t.Dock = windows.Forms.Dockstyle.fill
    Tables(t.Table.Name).ExtendLastCol = True
    Tables(t.Table.Name).Filter = "字段名称 = '" & pg & "'"
    Tables(t.Table.Name).SetColVisibleWidth("代码|100名称|100")
Next



执行到 pgs.TabPages(pg).AddControl(t) 就会出错!
请老师指教!!

 回到顶部