ASE, SQL, OLE, ADE

ASE, SQL, OLE, ADE

Reply
New Member
1 Posts
0 Kudos
Registered: ‎04-20-2009
Post 1 of 2

Run-time Error -'2145320928 (80210020)'

381 Views, 1 Replies
04-20-2009 12:14 PM
I developed a VBA application. In the application, I asked user to click on a AutoCAD drawing and get a return point. My code is as follows:

Dim blockRefObj As AcadBlockReference
If pick_insert_pointCheckBox.Value Then 'if user choose to pick an insert point by himself
Me.Hide
Dim returnPnt As Variant
returnPnt = ThisDrawing.Utility.GetPoint(, "Enter or pick up the insert point: ")
Dim cen(0 To 2) As Double
cen(0) = returnPnt(0): cen(1) = returnPnt(1): cen(2) = 0

Else
cen(0) = 0: cen(1) = 0: cen(2) = 0
End If

I can run this without problem in the design mode. The i created a tool button. But if I run this from the tool button, I always got stopped by an error message "Run-time Error -'2145320928 (80210020)', User input is a keyword. When the program stopped, the debug window show the code and marked "returnPnt = ThisDrawing.Utility.GetPoint(, "Enter or pick up the insert point: ")" in yellow. I guess this is the problem. But if I hit run again, it goes on without problem.

Anybody can help? Thank you very much.
Active Contributor
45 Posts
0 Kudos
Registered: ‎11-22-2008
Post 2 of 2

Re: Run-time Error -'2145320928 (80210020)'

08-30-2011 10:34 AM in reply to: tommyzh

I get same thing. Have you figured it out?

Post to the Community

Have questions about Autodesk products? Ask the community.

New Post
Announcements
Are you interested in helping shape the future of the Autodesk Community? To participate in this brief usability study, please click here. Your time and input is greatly appreciated!