明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 872|回复: 2

求助,AddTable出现问题

[复制链接]
发表于 2015-11-16 15:08:04 | 显示全部楼层 |阅读模式
本帖最后由 有病多吃饭 于 2015-11-16 16:30 编辑

Sub Test()

    Dim MyModelSpace As IAcadModelSpace
    Set MyModelSpace = ThisDrawing.ModelSpace
    Dim pt(0 To 2) As Double
    Dim MyTable As AcadTable

    Set MyTable = MyModelSpace.AddTable(pt, 12, 1, 804, 2431)
    MyTable.SetRowHeight(7, 2412) ‘这行编译的时候语法错误

End Sub

为什么呢,SetRowHeight,的提示就是(row as long, height as double)

 楼主| 发表于 2015-11-16 18:41:15 | 显示全部楼层
MyTable.SetRowHeight row:=6, Height:=1608
自问自答了,逛别的论坛看到的,小菜鸟,没见过这样赋值的语句

点评

row:=6, Height:=1608 这样是对参数的赋值,其存在的意义是,可以调用时参数顺序和定义时可以不一样,如:MyTable.SetRowHeight Height:=1608, row:=6 也是正确的  发表于 2015-11-17 22:02
发表于 2015-11-17 22:00:49 | 显示全部楼层
有病多吃饭 发表于 2015-11-16 18:41
MyTable.SetRowHeight row:=6, Height:=1608
自问自答了,逛别的论坛看到的,小菜鸟,没见过这样赋值的语句 ...

和那没关系,改成这样:MyTable.SetRowHeight 7, 2412 '即去括号
你没明白vb中函数(function)和过程(sub)或方法(method)的区别
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-25 09:58 , Processed in 0.163476 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表