bamboo 发表于 2003-5-21 15:37:00

帮帮忙，改错！谢谢

public sub aa()
dim acadobj as acadobj
dim retobj as acaddocument
dim line as acadline
for i=0 to retobj.modelspace.count-1
set acadobj=retobj.modelspace.item(i)
msgbox acadobj.objectname
next
end sub
在VB环境下，为什么程序执行到for语句总出错

zhuqi75 发表于 2003-5-21 17:06:00

不出错才叫奇怪

不出错才叫奇怪,你是不是很年轻?这里女人真的不多

mccad 发表于 2003-5-21 17:35:00

那个问题还没解决吗？

efan2000 发表于 2003-5-21 20:51:00

变量有错误

dim acadobj as acadobj，这个变量类型是错误的，应该为AcadObject。
for i=0 to retobj.modelspace.count-1，变量i应该还没有声明吧。

bamboo 发表于 2003-5-22 10:34:00

您好，问题解决了，谢谢您

bamboo 发表于 2003-5-22 10:36:00

我是刚刚接触这方面，因为我们毕业设计做这方面的东西，以后清多多帮助

页: [1]
查看完整版本: 帮帮忙，改错！谢谢