VB nanoCAD.Document.SendCommand("-laye...
Pape
20 Jun 2016
[THIS IS SOLVED]
Hi users of NanoCAD Forum,
i use NanoCAD 5.0 and try to start a macro to turn layers off or on.
I try the nanoCAD.Document.SendCommand() in VB.
What i am doing wrong?
I got a solution!
This is now working for me.
Thanks the examples from other members.
greeting from Germany
Edited by Pape, 23 August 2016 - 05:29 AM.
Hi users of NanoCAD Forum,
i use NanoCAD 5.0 and try to start a macro to turn layers off or on.
I try the nanoCAD.Document.SendCommand() in VB.
Imports nanoCAD
Dim napp As nanoCAD.Application
Dim ndoc As nanoCAD.Document
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
napp = New nanoCAD.Application 'nanocad have to be open with document'
ndoc = napp.ActiveDocument
'all Layer off'
ndoc.SendCommand("-layer;_off;*;;")'DOESN T WORK'
ndoc.SendCommand("-layer" & Chr(13) & "OFF" & Chr(13) & "*" & Chr(13) & "NO" & Chr(13) & Chr(13))'DOESN T WORK'
End Sub
What i am doing wrong?
I got a solution!
This is now working for me.
ndoc.SendCommand("-LAYER" & vbCr & "OFF" & vbCr & "*" & vbCr & "YES" & vbCr & vbCr)
Thanks the examples from other members.
greeting from Germany
Edited by Pape, 23 August 2016 - 05:29 AM.
