社区 › VB › 用VB选择图层

systech 发表于 2009-6-17 09:28:57

用VB选择图层

伙计们，
我知道您可以使用特定的名称来打开/关闭图层，但是在不知道图层名称的情况下有可能做到这一点吗？
**** Hidden Message *****

Matt__W 发表于 2009-6-17 10:09:04

    For Each lay In lays
      Set color = New AcadAcCmColor
      With color
            .ColorMethod = acColorMethodByACI
            .ColorIndex = "2"
      End With
      If UCase$(lay.Name) Like (("*") & ("ALIGN") & ("*")) Then   'This will freeze all layers that contain the word 'align'
                                                                  'Wildcards are used before and after the word
            lay.TrueColor = color
            lay.Freeze = False
            lay.LayerOn = True
      End If
    Next

systech 发表于 2009-6-17 10:15:58

这很酷，但他们想要的是说你有10个图层，在不同的图纸中都命名为不同的，打开1并关闭其他图层，然后打开2并关闭所有其他图层，依此类推。 正如在第一次谈话后向我解释的那样。：realmad：我喜欢软件开发中不断变化的规格。

Matt__W 发表于 2009-6-17 10:19:36

我不太明白你为什么要这么做。但是好孩子！

systech 发表于 2009-6-17 10:42:14

我也不

vegbruiser 发表于 2009-6-17 13:11:36

听起来像是LAYWALK命令

systech 发表于 2009-8-3 09:55:31

听起来像是LAYWALK命令
，这是我看这篇文章的第一个想法<他真的需要先把规格确定下来，然后再做进一步的工作。

查看完整版本: 用VB选择图层