CAD2006 ----VBA(Hello World)

Sub Hello()
ThisDrawing.Application.Documents.Add
Dim insPoint(0 To 2) As Double '定义插入点
Dim textHeight As Double '定义文本高度
Dim textStr As String '定义文本字符
Dim textObj As AcadText '定义文本对象
insPoint(0) = 2 '设定插入点 X 坐标
insPoint(1) = 4 '设定插入点 Y 坐标
insPoint(2) = 0 '设定插入点 Z 坐标
textHeight = 1 '设定文本高度为 1.0
textStr = "Hello World!" '设定文本字符
'创建文本对象
Set textObj = ThisDrawing.ModelSpace.AddText _
(textStr, insPoint, textHeight)

ThisDrawing.SaveAs ("Hello.dwg")

End Sub

CAD2006 ----VBA(Hello World)相关推荐

vba与MySQL交互_Excel、VBA与MySQL交互
几次更新失败,我已经放弃在这里更新了,有需要可以到博客园看: ################################################################ 本文主要 ...
vba 编辑combobox内容_初识Visual Basic编辑器并建立一段简单的代码
大家好,从今日开始我正式推出"VBA之EXCEL应用"教程,这个教程是面向初学人员的教程,教程一共三册,十七个章节,从简单的录制宏实现一直讲到窗体的搭建,都是我们在利用EXCEL工 ...
vba 字体颜色_多掌握一些VBA语句，让自己书写代码更加顺畅
VBA 是好东西,对于身在职场的人员,或者是积极打拼的创业者,是数据分析的首选,他可以实现量身定做,解决一些规律性强的问题.或者代替人处理一些可以描述出有逻辑关系的数据分析.多掌握一些VBA语句,让自 ...
vba编程教程视频教程_我已经完成了编程教程。怎么办？
vba编程教程视频教程 by Preethi Kasireddy 通过Preethi Kasireddy 我已经完成了编程教程. 怎么办? (I've done programming tutoria ...
VBA中级班课时3小结
本课内容:工作簿和工作表对象主讲:rover18 学习时间:2010年11月本节课将学习工作簿对象Workbooks.Workbook与工作表对象Worksheets.Worksheet.在我们了 ...
Excel VBA 教程
https://www.w3cschool.cn/excelvba/ Excel VBA 编程教程 https://www.yiibai.com/vba VBA教程 http://www.acc ...
Excel VBA附合导线平差自动计算表
这是6,7年前做的一个excel vba自动计算附合导线平差的表格. 对于做测绘的朋友来说,附合导线平差是最基础的技能,目前来说,能平差的软件和工具也很多,像南方的平差易,科傻平差.清华三维平差等,但 ...
再见 VBA！神器工具统一 Excel 和 Python
作者 | 东哥起飞来源 | Python数据科学经常给大家推荐好用的数据分析工具,也收到了铁子们的各种好评.这次也不例外,我要再推荐一个,而且是个爆款神器. Excel和Jupyter Noteb ...
重大改变！Python 或将取代 VBA 成为 Excel 官方脚本语言
如果微软的 Excel 中支持了人生苦短的 Python,你还会喜欢那个直接且易上手的 VBA 编程吗? 近日,据国外媒体 BLEEPINGCOMPUTER 报道,微软正考虑添加 Python 为官方 ...
在Outlook中用VBA导出HTML格式邮件
我每天所收到的e-mail中,订阅的电子杂志占了很大的比例.其中既有新闻也有电脑技术或娱乐性文章,加在一起竟有上百封.后来我知道单位里许多人同我一样也喜欢看,而且有的人还订了同样的杂志,所以我就每天收 ...

CAD2006 ----VBA(Hello World)

CAD2006 ----VBA(Hello World)相关推荐

最新文章

热门文章