点击下载此文件

使用TREEVIEW控件制作的无限级分类源代码,特点是加载速度比较快,加载TREEVIEW代码值得借鉴.另本例中还有在代码中调用自定义捷菜单的使用方法,并执行自己写的过程.

11 回复,0 引用: 控件使用示例演示源码(TREEVIEW)

    • quote 1. pigeon 于  2006-7-21 11:00:47 说:
    • "本例中还有在代码中调用自定义捷菜单的使用方法,并执行自己写的过程."这是怎么回事,我还没弄懂其中的奥妙,请指点
    • 回复该留言
    • quote 2. 黄海 于  2006-7-22 15:50:13 说:
    • 引自 pigeon
      "本例中还有在代码中调用自定义捷菜单的使用方法,并执行自己写的过程."这是怎么回事,我还没弄懂其中的奥妙,请指点


      自定义弹出式菜单的制作方法是跟普通菜自定义菜单无异,做好后再把把改成弹出式就可以使用SHOWPOPUP了.
    • 回复该留言
    • quote 3. windy 于  2007-11-3 23:36:51 说:
    • 您的这个程序把treeview讲的真好,给了我很多启发.但是还是有问题要请教,您是怎样通过代码将模块程序插入的?CommandBars("增加分类菜单").ShowPopup中"增加分类菜单"是联系的关键吗?

      另外,您右键菜单的两行"增加下级"和"删除分类"我翻编代码都没找到,请问您写在哪儿了呢?

      以上两条,恳请赐教,多谢!
      黄海 于 2007-5-13 11:00:16 回复
      你的问题都是关于菜单事件的,可以参考:http://www.msaccessonline.com/post/3.html
      windy 于 2007-5-13 23:25:03 回复
      您的回复速度真是惊人!多谢您的指点,希望您的网站越办越好Smile
      hzh 于 2007-11-3 23:36:51 回复
      改为"strCARGOTYPE_NO = Left(Rst!CARGOTYPE_NO, Len(Rst!CARGOTYPE_NO) - perSectionLong) & Right(CStr(CLng(Mid(Rst!CARGOTYPE_NO, Len(Rst!CARGOTYPE_NO) - perSectionLong + 1, perSectionLong)) + 10001), perSectionLong)"
      可解决
    • 回复该留言
    • quote 4. kimxyoen 于  2007-11-3 23:32:38 说:
    • 这个例子好象有点问题.
      我在"产品分类"窗体中添加一个标签,将点击节点后strCARGOTYPE_NO赋值给它,以便实时观察CARGOTYPE_NO编号的生成情况.
      我右击"产品分类"节点,添加一个分类A,再在A下添加两个分类A1和A2,然后再在"产品分类"节点下添加一个分类B,编号居然生成为:
      A:1014
      A1:10140001
      A2:10142
      B:10143
      完全乱套了.
      我的系统为WindowsXP2,ACCESS版本为:ACCESS 2003(11.5614.5606)
      黄海 于 2007-6-24 15:15:37 回复
      本例的目的是供网友下载学习,你说的情况感觉是你修改程序所致,请耐心做进一步调试,而本例没有问题.如果实在搞不定也可以把例子发给我看看.
      kimxyoen 于 2007-6-24 22:04:32 回复
      黄先生,你好!
      我在没有改动之前就发现了这个问题,在右击菜单中增加一个产品分类后,马上到产品分类表中查看,CARGOTYPE_NO编号的确生成得有些怪.我在窗体中添加标签是为了看得更直观而已.
      我想用ACCESS编一个"零件工时定额管理"数据库,因为我公司的零件比较多,而且品种复杂,所以想起了你的这个例子,最近细细地研究了一下.因为我没有系统地学过计算机编程,你的这个例子我也没有完全看懂,具体的我也说不上,找到了原因我再回复吧.
      hzh 于 2007-11-3 23:32:38 回复
      确有此问题,把"增加产品分类"模块的
      "strCARGOTYPE_NO = Left(Rst!CARGOTYPE_NO, Len(Rst!CARGOTYPE_NO) - perSectionLong) & CStr(CLng(Mid(Rst!CARGOTYPE_NO, Len(Rst!CARGOTYPE_NO) - perSectionLong + 1, perSectionLong)) + 1)"修改
    • 回复该留言
    • quote 5. 初小 于  2009-9-12 21:53:41 说:
    • 这个示例很精彩,很实用,给我很多启发,但如果能加入编辑节点、节点图标、拖放操作就更完善了。多谢
      黄海 于 2009-9-12 21:53:41 回复
      有收获这个例子就达到目的了。
    • 回复该留言
    • quote 6. joage 于  2009-11-15 16:13:25 说:
    • 比在别处看到的示例外观好看得多了
    • 回复该留言
    • quote 7. hzy888 于  2010-12-19 8:45:03 说:
    • 收藏学习中
    • 回复该留言
    • quote 8. 一叶知秋 于  2011-7-31 13:22:29 说:
    • 好东西
    • 回复该留言
    • quote 9. 蕊琪儿 于  2011-9-7 20:39:31 说:
    • 好东西!找了好久了
    • 回复该留言
    • quote 10. www.qiawei.com 于  2011-12-22 18:55:10 说:
    • http://www.qiawei.com
    • 一直在关注这个博客,很多不错的文章。
      今天冬至,晚上要去吃饺子哦!
    • 回复该留言
    • quote 11. www.96tz.com 于  2011-12-22 22:41:03 说:
    • http://www.qiawei.com
    • 很精彩的文章!支持一下。
    • 回复该留言

添加回复

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。