很多时候有若干个按钮,但是里面有相同的功能,比如上一节中所中用到的修改当前文档的度量单位为毫米这一功能,每一个功能都需要用到这个功能的时候,我们可以把它单独拉出来,放在另一个文件里面,用的时候只需要调用即可,可以有效减少代码量,让代码看起来更整洁. 而且还有一个更好的作用,就是只需要修改一次,就能在其它被调用的功能中生效.大大方便了后面的修改工作.
在宏编辑器的左上角找到我们的gms–>点击右键–>插入–>模块
然后修改模块名称为tool
然后再在这个模块里面输入转换当前文件度量单位的代码
Sub changeUnit()CorelDRAW.ActiveDocument.Unit = cdrMillimeter
End Sub
回到A页,把之前的代码修改一下
Sub 第一个插件()tool.changeUnitCorelDRAW.ActiveShape.SetSize 10, 10
End Sub
然后我们再测试一下,可以看到功能是完全相同的,说明这个调用成功了,基本这个原理,我们可以把各种常用的功能写成功能的形式,进行互相之间的调用