临时表,添加到 项目事件,不管用。
添加到窗口的afterload 事件,只能加载一次,不是动态的
Dim dtb As New DataTableBuilder("测试表")
dtb.AddDef("第一列", Gettype(String), 50)
dtb.AddDef("第二列", Gettype(String), 50)
dtb.Build()
MainTable= Tables("测试表")
Tables("窗口1_Table1").DataSource=DataTables("测试表")
Dim r As DataRow = DataTables("测试表").AddNew()
r("第二列")="1"
Dim r1 As DataRow = DataTables("测试表").AddNew()
r1("第二列")="1|12"
Tables("窗口1_Table1").Cols("第一列").DropForm = "目录树" '这个代码只能获取到右边的第一列,第列的值不管用
Tables("测试表").Cols("第一列").DropForm = "目录树 '这个代码不生效
DropDownOpening事件通过DropTable获取背后的表格,不要使用Tables("xxx")
Dim tbl As Table = e.Form.DropTable