Auto CAD VBA画100个圆，代码如下。 Sub CreateCircles() Dim cc(0 To 2) As Double cc(0) = 100 cc(1) = 100 cc(2) = 0 For I = 1 To 1000 Step 10 Call ThisDrawing.ModelSpace.AddCircle...
转载
2011-03-19 20:47:00
504阅读
2评论
VBA 读写文件 处理文本文件 1、Open 语句语法：Open pathname For mode [Access access] [lock] As [#]filenumber [Len=reclength]其中access、lock、reclength为可选参数，一般不用。mode 指定打开文件的方式。有5种：Input：以输入方式打开，即读取方式。Output：以输出方式打开，即写入方式。
转载
2024-03-20 10:40:54
464阅读
1.单击菜单栏，“绘图->多行文字。2.单击绘图工具栏“绘多行文本”按钮。3.在命令行中输入DrawMText，
原创
2022-07-20 17:33:17
217阅读
1.单击菜单栏，“绘图->多行文字。2.单击绘图工具栏“绘多行文本”按钮。3.在命令行中输入Dra
原创
2022-07-21 14:44:28
134阅读
继续学习VBA！'**********************文字框控件***************
'一 显示
'1 多行显示
'MultiLine 属性值为true时，可以多行显示文本
'2 文本框对齐
'左右对齐可以用TextAlign对齐，但上下对齐则没有相应的属性设置
'3 密码样式
'可以设置passwordChar属性来隐藏输入的内容
转载
2024-05-03 15:09:21
528阅读
前言在最新版本的 mxcad 插件中，我们提供了一个名为MxCADMText的自定义编辑器实体类,用于在CAD中渲染和管理富文本编辑器。基于该类，我们可以将富文本编辑器中的强大功能转移实现在我们的MxCAD项目中。在原本的富文本编辑器功能上，我们将文本与CAD功能相结合实现了多行文本的扩展，用户可以根据自己项目的需求将实体以文本内容的形式插入到我们的多行文本内，接下来我们将详细
Sub RemoveTextboxes() Dim SlideToCheck As Slide Dim ShapeIndex As Integer For Each SlideToCheck In ActivePresentation.Slides For ShapeIndex = SlideToCheck.Shapes.Count To 1 Step -1 If SlideToCheck.Shapes(ShapeIndex).Type = msoTextBox
原创
2022-04-18 10:35:49
1715阅读
(四)窗体和相关控件对象 VBA的编辑器和VB非常类似，因此也提供了窗体和相关的控件，但又由于Office的特点使VBA中的窗体、控件和VB存在一些差异。 1.用户窗体知识点 窗体是程序实现和用户交互的接口，通过窗体不仅可改善程序的界面友好性，而且可进一步增强、完善程序的功能。在VBA编辑器中可创建用户窗体，在工程资源管理器中右键单击项目，在出现的菜单中选择"插入→用户窗体"命令，
转载
2024-06-07 10:38:14
325阅读
CAD技巧，如何在CAD中添加一个多行文本？在编辑CAD图纸的过程能够为了更加方便快捷建筑设计师们都会借助CAD编辑器来绘制图形，但是一张CAD图纸中的内容太多，在有的地方需要给CAD图纸进行一些标注，以便更好的查看，但是如何在CAD中添加一个多行文本？小伙伴们知道要怎么来操作吗？下面小编就利用迅捷CAD编辑器标准版来教教大家如何在CAD中添加一个多行文本？想要了解的朋友就一起来看看吧！使用第一步
原创
2018-10-22 14:01:13
28阅读
相信很多朋友对于CAD编辑器，这个在CAD行业中比较常见的办公软件不陌生吧，CAD编辑器是CAD绘图中必不可少的一个工具，但是有的时候设计师们在编辑图纸内容的时候，有的地方需要输入一些文字来进行标注说明问题，在编辑器中有单行文本和多行文本都可以进行标注，那在CAD中如何创建单行文本和多行文本呢？下面我们就一起来看看具体操作步骤吧！第一步：首先，打开电脑，在电脑桌面中看一下有没有CAD编辑器，没有的
原创
2018-11-26 12:59:29
4阅读
1，需求说明： （1）需求1：按某列对数据表进行拆分，列号由用户输入确定，如按D列拆分，则由用户在input对话框中输入D，如按F列拆分，则由用户在input对话框中输入F。“拆分结果”的文件夹内；若没有该文件夹，则提前新建一个。 （3）需求3：将本功能加载到EXCEL主程序菜单栏中，方便重用。如下图： 2，处理
转载
2024-04-17 21:49:26
233阅读
最近遇到了一个甲方需要提供系统登录的用户名单和对应的角色权限内容。无奈直接从数据库导出的数据对应的都是编码，没有转成中文，想着偷个懒能不能直接用Excel直接转，网上看了一下有修改单元格格式的，但需要编码是2到3个。多的就用vba,于是这里记录一下我的操作，也供其他人有需求的直接copy,哈哈，不多说上代码。一.vba处理编码转文本示例下面代码就是将D列的数据从2到200行的编码数据，转成对应的文
转载
2024-06-23 23:11:42
171阅读
学习资料 https://www.yiibai.com/vba/vba_input_box.html输入框 InputBox函数说明提示用户输入值。当输入值后，如果用户单击确定 按钮或按下键盘上的ENTER 键，InputBox函数将返回文本框中的文本。如果用户单击“取消” 按钮，该函数将返回一个空字符串("")。函数用法InputBox(prompt[,title][,default][,xpo
转载
2024-04-28 11:21:30
170阅读
距离之前的三篇日志已经很久啦，今天终于完成了一个比较完整的自动化报表搭建过程基于公司数据保密原则，样板就不放到网上来了，简单说一下背景：这次access实现的功能包括：1）为部门整体搭建了一个员工基本资料数据库，里面包括从各个系统里获得的员工信息，如Zhang San,一个系统里叫San Zhang，一个系统叫sazhang，一个系统叫sun Zhang。这些信息汇总后，存在部门共享盘里，包括此次
转载
2024-08-26 14:45:50
86阅读
主要用到函数说明：MxDrawXCustomFunction::Mx_GetMTextContent得到多行文本的，不包括
原创
2022-07-20 17:52:05
183阅读
wMxDrawSelectionSet(); //选择图上所有对象. ss.AllSelect(); for(inti=0;i<ss.Count;i+...
原创
2022-07-20 18:26:03
170阅读
第一步，要连接数据库，首先要有数据源。这里我们选择的数据源是Access mdb文件。数据库名为DataBase，然后新建employees表，表的字段设计如下图： 第二步，我们要使用MFC与Access连接，还要显示最终结果如下图：这里我们首先要先设计窗体，窗体各个控件的属性如下所示：列表控件 &n
放了寒假呆在家里，我爸比较喜欢周易里的一些东西，于是问我能不能帮助他编写一个小程序来算卦。我想了想发现如果使用c语言直接做出来的页面太简陋，更美观的话需要一些API,而java也好久没有用过很生疏了。最后我想到了用VB来制作，发现用VB编写一些小型程序还是很方便的。程序样式如下：在这里我整理了一些关于窗口属性的介绍，如下：Name 窗体的名称ActiveControl 返回焦点所在的控件,该属性设
转载
2024-09-05 12:46:17
228阅读
场景： 填写年月格式的时候，默认是日期类型的，例如：填写2023-01，默认是2023/1/1，但是想要保持2023-01为文本格式的日期。 实现方式： 手动设置：选择需要设置格式的单元格，右键点击选择“设置单元格格式”，在弹出的对话框中选择“文本”格式即可。使用VBA代
转载
2023-09-04 14:13:14
204阅读
center中线层 hatch填充 dim标注 center中改颜色红或绿线型 2006版的tr 空格+空格
偏移o修剪TR空格 2004版的修剪 tr空格+f 蓝色的点是夹点ml只有两个夹点画墙一般240mm270mm300mm x全选—》右键—》TR
瞎写的
瞎写的
原创
2008-10-30 22:47:39
747阅读
