在上篇引见VBA的文章中,咱们了解了怎么去做图层,这日要和众人讲的即是怎么去使用上篇中的图层函数,来到达咱们要的成效,好比翻开图层,闭塞图层等.上面我以操纵下模板为例来讲说:先看看上面的代码:
SubCurDIE()CreatLayer“DIE”,14EndSub
以上代码将下模板设为目下层SubOnlyDIE()onelayer(“DIE”)IfLayerExist(“DIE2″)=TrueThenThisDrawing.Layers.Item(“DIE2″).layeron=FalseIfLayerExist(“DIE2_D”)=TrueThenThisDrawing.Layers.Item(“DIE2_D”).layeron=FalseIfLayerExist(“DIE2_M”)=TrueThenThisDrawing.Layers.Item(“DIE2_M”).layeron=FalseEndSub
以上代码为单开下模板图层SubDIE_D()greatlayer(“DIE_D”)EndSubSubDIE_M()greatlayer(“DIE_M”)EndSubSubcloseDIE()Calllayeron(“DIE”,False)EndSub以上代码为闭塞下模板图层
SubdeleteDIE()CallDelLayer(“DIE”)EndSubSubopenDIE()Calllayeron(“DIE”,True)EndSub
以上代码为翻开下模板图层,留意这边与单开的差别!
SubselDIE()SelectENT(“DIE”)EndSubSubMainDIE()MainLayer“DIE”EndSub
在上头的代码中,我将下模板界说为DIE,如许当咱们需求停止个中一项操纵时,就能够直接移用个中的函数了,比方闭塞图层,咱们就能够直接写下Calllayeron(“DIE”,False)这一行代码就好了!另外的模板代码的话,您唯有将对应的DIE修正成对应模板就好了.
人员任用、材料下载、模具培训，请干系优秀陈迪清QQ
点击“浏览原文”课程纲目
预览时标签不成点收录于合集#个转载请注明：http://www.0431gb208.com/sjszlff/1178.html
