Best way to convert my VBA program

[CadDog]

Hi all,

I have only two VBA program which
I wrote a few of years going which
are very handy to me and other users.

I would like to convert these two programs
over to vb.net (or whatever) for two reasons.

One - I can start learning and write in a new form.
Two - So I don't need to download any additional exe in the future.

Any guide or link which would help me get started would be welcome.

Thanks...

My search code:
caddogVBA01

[Coolmo]

Check out the "sticky" threads at the top of the .NET forum here. they really help out and get ya started quick. Especially the tutorial videos and the AutoCAD developer's guide link. It didn't take long for me to rewrite a lot of my proggys. Of course I now have more questions than answers but it's still a step in the right direction.

[CadDog]

Thanks Coolmo I will do...

I looked so hard I missed that...

[CadDog]

Thanks fixo for your offer,

I will send you the code to see if you can change it over to VB.net...

Hope you feel and get better very soon...

[Coolmo]

Thanks fixo for your offer,

I will send you the code to see if you can change it over to VB.net...

Hope you feel and get better very soon...

Sounds like a cool competition. Post the code or give us an idea as to what it does and we'll compete for the coolest .NET version!

Or not... just a thought

[CadDog]

Sounds like a cool competition. Post the code or give us an idea as to what it does and we'll compete for the coolest .NET version!

Or not... just a thought

Here you go:

All I have it do is:

• The user can call up a form with the use of a quick keyin
• The form list department and the layer list they like using (per company or NSC)
• The user select the layer to create and the program tells AutoCAD to create it.
• The layer list are stored on txt files which can be changed at anytime.
• Lastly, the program closes and uploads.

Have a look:

[Coolmo]

Pretty cool. What does the database TXT file look like? Comma delimited, etc.?

[CadDog]

Pretty cool. What does the database TXT file look like? Comma delimited, etc.?

Yes it is...

Here is that file:

Chain Link Fence Line	,C-Fenc,23,fence_x
Barbed Wire Fence Line	,C-Fenc-Barb,23,fence_xx
Wrought Iron Fence Line	,C-Fenc-Iron,23,m-fence_wi
Construction Fence Line	,C-Fenc-Stru,2,fenceline3
--------- Walls --------,0,7,Continuous
Concrete Retaining Wall	,C-Wall-Conc-Rtwl,3,continuous
CMU Retaining Wall	,C-Wall-Ccmu-Rtwl,3,continuous
Block Wall (CMU)	,C-Wall-Bloc,2,continuous
Stone Wall FenceLine	,C-Wall-Ston,23,continuous
--------- Misc  ----,0,7,Continuous
Stair & Yard Railing	,C-Fenc-Rail,1,continuous
GuardRail (metal) Line	,C-Fenc-Grai,1,guardrail
--------- By Others ----,0,7,Continuous
Chain Link Fence Line	,C-Fenc-Byot,9,fence_x
Structure Outline	,C-Bldg-Byot,9,Dashed2

Will having the VBA code help you...???

[CadDog]

Here how I have put it together:

>>> 1) AcadDoc.lsp :

;;;	VBA Path
(setq vbapath (strcat DriveL ":\\wheatjk\\apps\\autodesk\\Acad2008\\projects\\corp\\vba\\"))

and for fun I also added:

;Title name for layer lists used in QW
(vl-registry-write "HKEY_CURRENT_USER\\SOFTWARE\\VB AND VBA PROGRAM SETTINGS\\DMJMAPPS\\\\AutoCad2008" "LayerMakerAcadMnuFileName"
"DMJM | AECOM  Standard Layer Maker 2008")

2) AcadDoc.lsp calls Abbre08.lsp:

(defun c:qw ( / filepath)
;;; Change vbaPath in the acad.lsp if location changes
  (if (setq filepath (findfile (strcat vbaPath "layermaker.dvb")))
    (progn
      (vl-vbaload filepath)
      (vl-vbarun "ThisDrawing.OpenLayerMaker")
      )
    (progn
      (princ "\nUnable to find VBA project file: LayerMaker.dvb")
      ))
  (princ)
  )

(defun c:unloadQW ()
     (Setvar "cmdecho" 0)
       (vl-cmdf "vbaunload" (strcat vbaPath "LayerMaker.dvb"))
     (Setvar "cmdecho" 1)
     (princ)
    )

With this active all the user need to do is type in on command line:
QW (don't ask why QW... hahaha)

Layer Maker just makes it easy for me to keep everyone standard and
for the users to create a layer (s) easy and fast.
This help me not needing to create a template file with a million layers which
makes it very hard user to find the one layer they need.
Please don't purge those dwg files if you don't to remove all the layers...hahaha

Here is the VBA file...

[Coolmo]

It's password protected and I don't have or know of all the "stuff" to just run it the way you do. Of course I'm sure it needs the TXT database file for the layers on startup.

I have a very similar program like this where you have certain layer categories and then you can control the way and number of layers that come in with a simple click. It's also in VBA and I'm converting it now. I've become very lazy with this though because I have hundreds of programs in both AutoLisp and VBA that I'm converting over to VB.net.

Did you check out the AutoCAD Developers guide and/or get a copy of VB Express yet?