AutoCAD VBA Sendkey打开/关闭大写锁定

时间:2017-04-06 20:23:35

标签: vba autocad sendkeys capslock

我在AutoCAD中使用了一些使用SendKeys命令的自定义命令。最近这开始打开和关闭我的大写锁定 Num Lock ,并且有点不可预测,所以我正在寻找SendKeys命令的替代方案。

我可以使用哪种结果会有相同的结果?

该代码允许我复制一个对象并多次粘贴它。

Sub CopyMultiple()
    SendKeys "MULTIPLE" & Chr(13) & "COPY" & Chr(13)
End Sub

1 个答案:

答案 0 :(得分:1)

此功能已内置于AutoCAD中:

COPYMODE系统变量设置为0,或使用mOde选项作为标准COPY命令的一部分,从命令中更改此系统变量:

Command: COPY
Select objects: 1 found    
Current settings:  Copy mode = Multiple
Specify base point or [Displacement/mOde] <Displacement>: O
Enter a copy mode option [Single/Multiple] <Multiple>: