ericyu 发表于 2006-4-28 16:26:00

[VBA]为什么ThisDrawing.Utility.GetPoint赋值的变量只能为Variant

Dim ptCen As Variant '横断端面中心点Option Explicit
''为什么 as AcadPoint不行
Form1.Hide
ptCen = ThisDrawing.Utility.GetPoint(, "拾取中心点:")
为什么把Dim ptCen As Variant改成Dim ptCen As AcadPoint
就会提示对象变量或 With 块变量没有设置(错误 91)

zxj_76 发表于 2006-4-28 16:50:00

点实体和点坐标是两个概念
页: [1]
查看完整版本: [VBA]为什么ThisDrawing.Utility.GetPoint赋值的变量只能为Variant