liub1979 发表于 2004-7-26 21:49:00

老问题Select acSelectionSetAll, , , gbcode, gbdata

程序片段如下:
                       Dim ss As AcadSelectionSet
                       Dim gbcode(3) As Integer
                       Dim gbdata(3) As Variant
                       gbcode(0) = -4: gbdata(0) = ""
注意符号成对出现

莫名 发表于 2004-7-26 22:08:00

Dim gbcode(0) As Integer,gbdata(0) As Variant
                       gbcode(0) =0: gbdata(0) = "LWPOLYLINE,CIRCLE"
你的代码写错了,应该是
gbcode(3) = -4: gbdata(3) = "OR>"

雪山飞狐_lzh 发表于 2004-7-26 22:10:00

谢谢哥哥,姐姐^_^
页: [1]
查看完整版本: 老问题Select acSelectionSetAll, , , gbcode, gbdata