|
关于vbnet代码不能运行的问题
vbnet与vb不同在于原来的variant类型都变成了object类型,但是我在用选择筛选的时候发现代码老是通不过,典型的用getentity如下:
Dim acadobj As Object
Dim acaddoc, acadutil As Object
Dim returnobj As Object
Dim d As Object
acadobj = GetObject(, ".Application.16")
acaddoc = acadobj.ActiveDocument
acadutil = acaddoc.Utility
AppActivate("Autocad")
Call acadutil.GetEntity(returnobj, d, "..选择物体") ***在这一句提示类型不匹配。 |
|