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

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

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

点实体和点坐标是两个概念

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

发表回复

精选推荐