帮帮忙，改错！谢谢

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

账号		自动登录	找回密码
密码			注册

帮帮忙，改错！谢谢

不出错才叫奇怪

那个问题还没解决吗？

变量有错误

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

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