使用VBA獲取autocad中圖形內項目的數量

我想獲取模型空間內存在的項目數量。如果我沒有把Count弄錯，但我無法做到這一點（我可能是錯的）。使用VBA獲取autocad中圖形內項目的數量

例如，Set entity = ThisDrawing.ModelSpace.Item(0)只獲得第一項。和Set entity = ThisDrawing.ModelSpace.Item(0)獲得第二。但是，如何知道我們有多少？

我試過ThisDrawing.ModelSpace.Count，但是運行時出現以下錯誤。

enter image description here

2015-01-07 tony9099

愚蠢的問題：你試過'ThisDrawing.ModelSpace.Count'？ –

如何處理ThisDrawing.ModelSpace.Item中的每個項目？可能錯誤的語法。 – Chrismas007

@JasonFaulkner查看更新後的問題 – tony9099

專家對此的解決方案是使用ThisDrawing.ModelSpace.Count但將其設置一個整數變量的內部。它現在使用下面的工作

Dim X As Long 
X = ThisDrawing.ModelSpace.Count

2015-01-08 08:39:47 tony9099

你可能會考慮把它改爲Long而不是Integer，否則你可能會經常遇到溢出。 –

完成隊友，thnx – tony9099

回答