社区 › VB › 为什么 插入块的程序 会出错？

123movie 发表于 2008-12-17 17:22:00

为什么 插入块的程序 会出错？

哪位大虾给我指出错误，为什么会出错？
块文件和dvb都在同一个目录下，是2006 sp1版本的
错误如附件。
程序如下：
Private Sub test()          '测试插入块
Dim objblkref As AcadBlockReference
Dim insertionPnt(0 To 2) As Double
insertionPnt(0) = 0
insertionPnt(1) = 0
insertionPnt(2) = 0
Set objblkref = ThisDrawing.ModelSpace.InsertBlock(insertionPnt, "块.dwg", 1, 1, 1, 0)
End Sub

dfgs 发表于 2008-12-17 20:20:00

块文件应带齐路径吧

123movie 发表于 2008-12-17 20:56:00

呵呵， 非常感谢dfgs
                       
路径要全才可以。
下午测试了一下午都没发现原因，论坛很好很强大。

查看完整版本: 为什么 插入块的程序 会出错？