ChiN丶 发表于 2019-6-10 18:43:00

用VB在CAD中绘制直线的时候线型设置不了

Set lineObj = acadDoc.ModelSpace.AddLine(startPoint, endPoint)
    lineObj.color = colors
    lineObj.lineweight = lineweight
    lineObj.lineType = "CENTER2"
最后这个设置线型的代码只有将线型设为"BYLAYER"的时候才不会报错,其他的线型都会报错。
错误截图如图。
想了很久想不出原因,希望有高手指导一下。

mikewolf2k 发表于 2019-6-11 09:46:00

请先确认要设置的线型是否存在。byblock和continuous能用么?

ChiN丶 发表于 2019-6-11 13:48:00


这两个是可以的,别的不行,比如虚线什么的。

mikewolf2k 发表于 2019-6-11 14:19:00

那就是没加载,不存在当然不能设置。

ChiN丶 发表于 2019-6-11 15:45:00


那怎样在设置先行之前先把其他的线型加载呢

mikewolf2k 发表于 2019-6-12 09:44:00

具体没操作过,自己网上仔细搜索。

ChiN丶 发表于 2019-6-12 09:55:00


ok   多谢

ChiN丶 发表于 2019-6-20 10:33:00

问题已解决,有些线型需要加载,所以要提前加载这些线型,语句为:
acadDoc.Linetypes.Load lineType, "acad.lin"
其中lineType是要加载的线型,"acad.lin"为CAD自带的线型文件
页: [1]
查看完整版本: 用VB在CAD中绘制直线的时候线型设置不了