bsirhell 发表于 2006-6-22 14:02:00

求助

请问各位大哥,建了一个过滤文字的选择集,怎样知道选择集中各种文字的数量?比如我想知道选择集中字符“T”和“R”的数量,该怎么写函数?

wyj7485 发表于 2006-6-24 09:09:00

循环选择集,判断文字内容为T就记数器加1

wyj7485 发表于 2006-6-24 09:20:00

Dim a As AcadText<BR>Dim n As Integer<BR>n = 0<BR>For Each a In myset<BR>If a.TextString = "T" Then n = n + 1<BR>Next
页: [1]
查看完整版本: 求助