2006年5月7日
点击下载此文件
使用TREEVIEW控件制作的无限级分类源代码,特点是加载速度比较快,加载TREEVIEW代码值得借鉴.另本例中还有在代码中调用自定义捷菜单的使用方法,并执行自己写的过程.
名称(*)
邮箱
网站链接
验证(*)
正文(*)(留言最长字数:1000)
记住我,下次回复时不用重新输入个人信息
◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。
自定义弹出式菜单的制作方法是跟普通菜自定义菜单无异,做好后再把把改成弹出式就可以使用SHOWPOPUP了.
另外,您右键菜单的两行"增加下级"和"删除分类"我翻编代码都没找到,请问您写在哪儿了呢?
以上两条,恳请赐教,多谢!
可解决
我在"产品分类"窗体中添加一个标签,将点击节点后strCARGOTYPE_NO赋值给它,以便实时观察CARGOTYPE_NO编号的生成情况.
我右击"产品分类"节点,添加一个分类A,再在A下添加两个分类A1和A2,然后再在"产品分类"节点下添加一个分类B,编号居然生成为:
A:1014
A1:10140001
A2:10142
B:10143
完全乱套了.
我的系统为WindowsXP2,ACCESS版本为:ACCESS 2003(11.5614.5606)
我在没有改动之前就发现了这个问题,在右击菜单中增加一个产品分类后,马上到产品分类表中查看,CARGOTYPE_NO编号的确生成得有些怪.我在窗体中添加标签是为了看得更直观而已.
我想用ACCESS编一个"零件工时定额管理"数据库,因为我公司的零件比较多,而且品种复杂,所以想起了你的这个例子,最近细细地研究了一下.因为我没有系统地学过计算机编程,你的这个例子我也没有完全看懂,具体的我也说不上,找到了原因我再回复吧.
"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)"修改
今天冬至,晚上要去吃饺子哦!