以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 临时表,添加动态的下拉菜单 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=189431) |
||||
-- 作者:puma -- 发布时间:2023/12/1 9:36:00 -- 临时表,添加动态的下拉菜单 临时表怎么添加动态的下拉菜单
|
||||
-- 作者:有点蓝 -- 发布时间:2023/12/1 9:40:00 -- 一楼那个是下拉窗口,不管什么表,用法都一样 |
||||
-- 作者:puma -- 发布时间:2023/12/1 11:22:00 -- 临时表,添加到 项目事件,不管用。 添加到窗口的afterload 事件,只能加载一次,不是动态的
|
||||
-- 作者:有点蓝 -- 发布时间:2023/12/1 11:31:00 -- 临时表怎么创建的? |
||||
-- 作者:puma -- 发布时间:2023/12/1 11:44:00 --
上传个实例吧! 需要达到表A第一列效果, 窗口1 第一列 需要动态下来目录树
|
||||
-- 作者:有点蓝 -- 发布时间:2023/12/1 11:50:00 --
|
||||
-- 作者:puma -- 发布时间:2023/12/1 12:18:00 -- 我电脑打不开了,能用21版本的吗?我不敢升级 |
||||
-- 作者:有点蓝 -- 发布时间:2023/12/1 13:40:00 -- 就是在生成临时表后,在设置临时表的列 |
||||
-- 作者:puma -- 发布时间:2023/12/2 9:23:00 -- 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 = "目录树 \'这个代码不生效
|
||||
-- 作者:有点蓝 -- 发布时间:2023/12/2 9:31:00 -- DropDownOpening事件通过DropTable获取背后的表格,不要使用Tables("xxx") Dim tbl As Table = e.Form.DropTable
|