以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 按钮代码求助 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=5614) |
||||
-- 作者:wqc360 -- 发布时间:2009/12/24 9:06:00 -- 按钮代码求助 能否实现窗口3个节点生成按钮和撤消按钮代码集合在筛选按钮中,一键点一次变一下节点生成,最后撤消,谢谢
[此贴子已经被作者于2009-12-24 9:22:18编辑过]
|
||||
-- 作者:czy -- 发布时间:2009/12/24 10:55:00 -- Vars("Val") = Vars("Val") + 1 Select Case Vars("Val") Mod 4 Case 1 e.Form.Controls("TreeView1").BuildDataTree("质量日记录", "", "姓名","年月") Case 2 e.Form.Controls("TreeView1").BuildDataTree("质量日记录", "","年月","日") Case 3 e.Form.Controls("TreeView1").BuildDataTree("质量日记录", "", "年月","姓名") Case 0 Tables("质量日记录").ApplyFilter = False End Select |
||||
-- 作者:czy -- 发布时间:2009/12/24 10:57:00 -- 说明,先增加一个数值型全局变量,全局变量名称为:Val |
||||
-- 作者:wqc360 -- 发布时间:2009/12/24 12:10:00 -- 是Vars.Add("Val ",GetType(Integer))这样吗,是在Initialize事件吗 |
||||
-- 作者:czy -- 发布时间:2009/12/24 12:12:00 -- 是的。 |
||||
-- 作者:wqc360 -- 发布时间:2009/12/24 14:22:00 -- 谢谢C版,这样节省了很多空间,也方便了很多,再次感谢。 |