求助:如何读取(写入)CAD表格里的数值
Dim MyModelSpace As IAcadModelSpaceSet MyModelSpace = ThisDrawing.ModelSpace
Dim pt(2) As Double
Dim MyTable As AcadTable
Set MyTable = MyModelSpace.AddTable(pt, 5, 5, 10, 30)
插入一个这样的CAD表格后之,我想在表格里添加数据,比如在A2单元格里添加数值1.因该怎么操作呢?
建议不要用com方式编写，去得table对象后，就可以再指定单元格内容 liuxu042 发表于 2012-10-30 13:19 static/image/common/back.gif
建议不要用com方式编写，去得table对象后，就可以再指定单元格内容
能写个简短的示例吗?我学这个没多久,不太明白你的意思.谢谢了 MyTable.SetText 2, 1, "明经通道" 第一个参数2代表第二行,第二个参数1第一列,第三个是要输入的值 sscylh 发表于 2012-10-30 16:21 static/image/common/back.gif
MyTable.SetText 2, 1, "明经通道" 第一个参数2代表第二行,第二个参数1第一列,第三个是要输入的值
谢谢版主的帮助.我还想请教一下版主该如何读取表格里的内容易呢?可不可以把整个表里的内容赋值到一个二维数组中?
另外我也把你刚才的答复修正一下,CAD表格的行列计数是从0开始的,参数2,1代表是不是第2行第1列,而是第3行,第2列. 本帖最后由 Flyingdancing 于 2012-10-30 19:28 编辑
弄懂什么叫对象模型……，每个对象的变量类型是什么。这是必须的
A.B.C.D.E，这样的结构，每一个你需要的D，直接找父对象C。如果C不支持你要的D，说明程序不支持，你就必须变相的编程达到目的。你问其他人，得到的答案也不会超出这个范围。至于编什么样的程序，除了某些复杂情况，最好自己动手
还不明白，当我没说
以后，就完全只要依赖于F1就行了。对于需要的类型直接F1 挪威的森林 发表于 2012-10-30 18:13 static/image/common/back.gif
谢谢版主的帮助.我还想请教一下版主该如何读取表格里的内容易呢?可不可以把整个表里的内容赋值到一个二维 ...
呵呵,大意了...........
读取表格里面的内容:object.GetText(row, col)
如果想要赋值给一个二维数组
可以先定义数组:redim arr(1 to table.rows,1 to table.columns)
然后两个循环 for i=1 to table.rows
for j=1 to table.columns
arr(i,j)=table.gettext(i,j)
这样子.
看楼主是好学之人,想必一点就通.
Flyingdancing 发表于 2012-10-30 19:27 static/image/common/back.gif
弄懂什么叫对象模型……，每个对象的变量类型是什么。这是必须的
A.B.C.D.E，这样的结构，每一个你需要的D ...
很惭愧,我的计算机方面的基础很差,需要去学的东西又多而杂,往往学了这头忘了那了那头,所以学了一段时间仍然长进不大.我现在是出于让自己的工作方便有效一些才想去编一个小程序,代码都是在论坛上东拼西凑,有些没找到的内容就发贴求助了 本帖最后由 crazylsp 于 2013-3-14 17:29 编辑
这个例子可以学习,不过我想知道的是把文本分开后按顺序放入一行各列里面
页:
[1]