本帖最后由 作者 于 2009-12-12 16:40:39 编辑
. 试了很多办法都不行,只好来请教各位: Dim FilterType(0 To 1) As Integer Dim FilterData(0 To 1) As Variant
FilterType(0) = 0 FilterType(1) = 370 FilterData(0) = "对象类型" FilterData(1) = "???" '请问各位此处针对不同的对象类型,应是什么内容?(我试过把Lineweight的值写到这里,可是却不行),这里先谢过了 ssetobj.SelectOnScreen FilterType, FilterData .Ps----CAD是2004版的 . . |