以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  tabcontrals点击页面标签加载表  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=137459)

--  作者:lfz123
--  发布时间:2019/7/6 15:15:00
--  tabcontrals点击页面标签加载表
我想在tabcontrals的SelectedIndexChanged事件中点击页面标签时执行以下代码,表格并没有加载进来,
If  e.Sender.SelectedIndex = 1 Then
    If DataTables.Contains("股东及出资信息") = False Then
        DataTables.Load("股东及出资信息")
        Dim t As Table = Tables("股东及出资信息")
        t.Grid.Styles.EmptyArea.backcolor = color.white \'设置表格内空白区域的背景色为 白色
        t.Grid.Styles.EmptyArea.Border.Style = 0   \'去表格边框
        t.cols("股份").GrandTotal = True \'指定要合计的列
        t.Cols("股本").GrandTotal = True
        t.Cols("认缴出资额").GrandTotal = True
        t.Cols("实缴出资额").GrandTotal = True
        t.GrandTotal = True \'显示合计模式
    End If
End If
    

--  作者:有点蓝
--  发布时间:2019/7/6 15:32:00
--  
如果要绑定到窗口表,需要重新设置

……
DataTables.Load("股东及出资信息")
e.form.controls("Table1").table.datasource = DataTables("股东及出资信息")