topic Re: VB routine to VB.NET in .NET Forum

VB routine to VB.NET

gizmowiebe — Thu, 28 May 2009 11:32:41 GMT

Hello,

I have a few years experience working with VB6 and VBA in combination with AutoCad. Now due to various reasons I would like to switch to VB.NET. For that I have downloaded Visual Basic 2008 Express.

Attached I added a VB routine that I would like to use in Visual Basic 2008 Express.

Does anybody know how to convert this

Thx in advance.

Wiebe

Re: VB routine to VB.NET

Anonymous — Thu, 28 May 2009 14:20:48 GMT

If you just want to get this into VB.NET pretty much as is then:

1) Create a new project.
2) Paste the code into a suitable place - a button click event in a windows app or Sub Main() of a console app.
3) Add references to the AutoCAD and AutoCAD/ObjectDBX type libraries.
4) Import the namespaces you'll be using (unless you want to fully qualify everything) - Autodesk.AutoCAD.Interop and Autodesk.AutoCAD.Interop.Common.
5) Declare your undeclared variables.
6) Fix your unterminated If blocks and For loop.
7) Enjoy.

Caution: Contents may be hot. Your mileage may vary. Results may not be typical.

No bytes were harmed during the production of this post.

Re: VB routine to VB.NET

gizmowiebe — Thu, 28 May 2009 14:56:32 GMT

Thx fantum for your prompt reply.

I got as far as the function attached. But everytime I get a HRESULT: 0x8007007E error on the blockreference parts.

Any ideas?

Regards

Wiebe

Re: VB routine to VB.NET

arcticad — Thu, 28 May 2009 15:20:47 GMT

Since you are Late Bound you don't have any type defined.
Use typename instead.

{code}
For Each entity In dbxDoc.ModelSpace
If TypeName(entity) = "IAcadBlockReference" Then
MsgBox(entity.name)
End If
Next entity
{code}

Re: VB routine to VB.NET

Anonymous — Thu, 28 May 2009 15:36:55 GMT

Is there a reason for using late binding?