eagling的个人空间

我的本意是想在现在的点层(point)上根据自己输入的坐标添加新的点， 可是运行后出现“自动化（Automation）错误”，高手能否解答下是怎么回事？？？？？<BR>sub addpoint()<BR>Dim pPoint As IPoint<B...