CorelDRAW 零基础 VBA插件教程: 打造最简单的九宫格标记圆插件
本帖最后由 landboy 于 2024-5-4 08:51 编辑下载完整的 九宫格标记圆围绕圆GMS.zip
1.打开脚本面板: ALt+Shift+F11
2.鼠标选到脚本面板中 Visual Basic for Applications
3.脚本新建-宏项目保存 MarkEllipse.gms 到任意目录
4.打开脚本编辑器: Alt+F11
5.选到 MarkEllipse.gms 项目，右键菜单-》插入-》模块
6.把模块名改名成 tools 然后在模块中复制示例代码，点击保存按钮
<blockquote>Sub Test_画圆()
7. 下面来测试这个最简单很实用的标记圆示例。
如下图，先绘制一个矩形，然后点击右边宏管理器中的工具，就能很方便 给这个物件 九宫格标记了
8. 代码还可以变化，改动其中一行成 For i = 1 To 8 Step 2，就可以一只给四个角落标记
因为文章，代码被吃了，补上代码，这个应该是九宫格画圆最简单的代码了
Sub Test_画圆()
Set s = ActiveShape
ActiveDocument.Unit = cdrMillimeter
For i = 1 To 9
ActiveDocument.ReferencePoint = i
ActiveDocument.ActiveLayer.CreateEllipse2 s.PositionX, s.PositionY, 5
Next
End Sub 还是坛子里的大神多啊！ 给我们小白提供这么好的的学习资源 xiaoshenren 发表于 2024-5-4 09:34
还是坛子里的大神多啊！ 给我们小白提供这么好的的学习资源
其实只要会去看文档，多尝试这些都是挺简单。
业余时间，多练习，工作就用的上了 现在有了chatgpt等ai工具，代码都懒写了，直接让ai写好调用了 用在哪方面的呀，哥，好像对我印刷厂上班的用不到 chunhui0712 发表于 2024-5-4 12:24
现在有了chatgpt等ai工具，代码都懒写了，直接让ai写好调用了
我就进场要AI写，但是AI总是信口开河，漏洞百出，写出来的东西需要仔细甄辨
AI写代码目前只适合写框架，和拓展思路
特别想CDR的插件这种更不适合 请教怎么学习自己写代码？ 兰公子，这个直接丢GMS文件夹里面能用吗？ baruny 发表于 2024-5-11 09:01
兰公子，这个直接丢GMS文件夹里面能用吗？
单文件，加载就可以用。丢gms目录当然也可以的
页:
[1]