菜鸟求助！！！！！！

xujie5606

刚学编程，希望各位高手帮忙解答！谢谢！
通过屏幕选择对象来创建图块，调试下段程序有异常，希望各位高手帮忙解答！谢谢！
Dim optsel As New PromptSelectionOptions
            optsel.MessageForAdding = "选择加入块的对象"
Dim ressel As PromptSelectionResult = ed.GetSelection(optsel)
            Dim ssel As SelectionSet = ressel.Value
Dim ids As ObjectId() = ssel.GetObjectIds()
For Each sselid As ObjectId In ids
                Dim ent As Entity = trans.GetObject(sselid, OpenMode.ForRead)
               blocktablerecord.AppendEntity(ent）)-------此句调试有异常，

wowan1314

我只能告诉你！这里是lisp板块！你发错地方啦！

q530496591

这头像我喜欢!也给我一个呗.用用!