object_vb.net

[Anonymous]

Welcome Forum! 

I have a question related to vba of AutoCad, reference your comments. Comments Reference sent to the email address: xanhnhnn280683@gmail.com  thank you.

Questions:( I write mã VBA trong autocad running best, select in objects domain non empty, select the outside of objects domain Empty:)

Sub testboundary

Dim kiemtradoituong As Long, RetPoint As Variant

kiemtradoituong = ThisDrawing.ModelSpace.Count

Dim pt As Variant

pt = ThisDrawing.Utility.GetPoint(, "Select object or enter to finish")

ThisDrawing.SendCommand "-Boundary" & vbCr & pt(0) & "," & pt(1) & vbCr & vbCr

If ThisDrawing.ModelSpace.Count > kiemtradoituong Then

RetPoint = ThisDrawing.Utility.GetPoint(, " non domain Empty ")

Else

RetPoint = ThisDrawing.Utility.GetPoint(, " domain Empty ")

End If

End sub

by vb.net language that supports creating  dynamic library (dll), so I make run some examples vba in autocad.( Address reference: http://through-the-interface.typepad.com/through_the_interface/2011/08/debugging-autocad-net-project...).

when I create file dll by visual tudio 2010 (vb.net) support, the variable (Dim pt As Variant) in vba autocad,  vb.net changed (Dim pt As Object) run vba autocad error, looking for help

Best regards

Xanhnhnn280683