[求助][VBA]vba-函数使用

jacky789

h = .GetReal(vbCrLf & "Enter an real")
select case
...
end select
像上列语句类型也可以使用DLL封吗？？
需要宣告什么吗？？
:)

雪山飞狐_lzh

当然可以，要引用AutoCad的类型库，或者用后期绑定也行

jacky789

将下列纳入DLL语句中：

Set aa = thisdrawing.ModelSpace.AddCircle(cc, bb)
上列语句中会显示"thisdrawing"变数未定义
该如何解决呢??(把autocad 2006 type library引用了)

谢谢版主的回答～～:)

xinghesnak

应该这样吧，你试试

dim thisdrawing as object

set thisdrawing=getobject(,"acad.application")

没试过DLL，不知道得到acad函数库管不管用。。。^_^

jacky789

不行使用A  ～～

找不到active X物件～～