[求助]addline的命令执行后出现无数据库的错误
<p>Dim Spoint As Variant<br/>Dim Epoint As Variant</p><p>rmd1 = "输入起点"<br/>rmd2 = "输入终点"</p><p>Spoint = ThisDrawing.Utility.GetPoint(, rmd1)<br/>Epoint = ThisDrawing.Utility.GetPoint(Spoint, rmd2)<br/>ThisDrawing.ModelSpace.AddLine Spoint, Epoint</p><p>各位老大:</p><p>上述代码在执行之ThisDrawing.ModelSpace.AddLine Spoint, Epoint时出现了如下错误,</p><p>运行时错误'-2145386390(8020006a)';</p><p>无数据库</p><p>请问各位对此有何高见,怎么处理?</p><p>多谢了</p><p></p>
页:
[1]