每次cad 打开生成acad.lsp

每次cad打开生成acad.lsp，原因：计算机中存在CAD病毒。

解决的方法和 *** 作步骤如下：

准备工具：“筑原CAD病毒专杀”工具。

1、首先，打开文件夹以查看自动生成的acaddoc.lsp脚本文件，如下图所示。

2、其次，完成上述步骤后，迟胡准备好在Internet上下载的“筑原CAD病毒专杀”软件，如下图所示。

3、接着，运行“筑原CAD病毒专杀”工具并开始扫描。

 该软件将扫描整个计算机并清除病毒，扫描的过程中无需做任何 *** 作，如下图所示。

4、然后，完成上述步骤后，等待软件扫描并删除病毒，然后关闭软件，如下消旦搜图所示。

5、最后，完成上述步骤后，再次打开原始CAD文件夹中的CAD文拿历件，将不再生成acaddoc.lsp文件，病毒已被杀灭，如下图所示。这样，问题就解决了。

当然可以了，枯迹者但至少你嘚懂一点vba

画一条线：

stPnt(0) = a.Left: stPnt(1) = startY - a.Top: stPnt(2) = 0

edPnt(0) = stPnt(0): edPnt(1) = startY - a.Top - a.Height: edPnt(2) = 0

Set lineObj = objModelSpace.AddLine(stPnt, edPnt)

插入文字：州贺

insPnt(0) = a.Left + a.Width / 2

insPnt(1) = startY - a.Top - a.Height /没薯 2

insPnt(2) = 0

Set textObj = objModelSpace.AddText(a.Text, insPnt, txtHeight)

---