Valued Mentor
Posts: 606
Registered: ‎10-01-2006
Message 1 of 2 (114 Views)

Dealing with Keywords but also alllowing double and return key enter as well

114 Views, 1 Replies
07-11-2012 02:15 PM



I am trying to get my code to work more like some of the built in autocad commands below is the code I have come up with. However if the string returned is not a Keyword or a string that can be converted to a double it is then not acceptable input. How do I jump back to re ask for the input. I could use goto I guess but thats not good practice is there a better way?




'ask the user if they want to accept the sureface level at the lid level or enter a new one


Dim acDoc AsDocument = Application.DocumentManager.MdiActiveDocument


Dim pKeyOpts AsPromptKeywordOptions = NewPromptKeywordOptions("")


Dim CurrentLidLevel AsDouble = oStructure.RimElevation

            pKeyOpts.Message = vbLf &

"Structure Lid Level:" & CurrentLidLevel






'pKeyOpts.Keywords.Default = "New"

            pKeyOpts.AllowNone =



Dim pKeyRes AsPromptResult = acDoc.Editor.GetKeywords(pKeyOpts)


SelectCase pKeyRes.StringResult




'Do nothing

                    Lidlevel = CurrentLidLevel




'ask user for grade to use

                    Lidlevel = acDoc.Editor.GetDouble(vbCrLf &

"Enter New lid level of Structure").Value




'Enter key hit


"using surface level for lid level")


Case Else


'Check if input was a number that we can work with




Double.TryParse(pKeyRes.StringResult, Lidlevel)


Catch ex AsException






'enter pressed do nothing





Justin Ralston
*Expert Elite*
Posts: 752
Registered: ‎02-13-2008
Message 2 of 2 (107 Views)

Re: Dealing with Keywords but also alllowing double and return key enter as well

07-11-2012 03:16 PM in reply to: ralstogj

Use GetDouble with PromptDoubleOptions and AutoCAD will automatically reprompt if the user enters anything that is not a double or a keyword.  Setting AllowNone = true allows the Enter Key.

Dave O.                                                                  Sig-Logos32.png

You are not logged in.

Log into access your profile, ask and answer questions, share ideas and more. Haven't signed up yet? Register

Are you familiar with the Autodesk Expert Elites? The Expert Elite program is made up of customers that help other customers by sharing knowledge and exemplifying an engaging style of collaboration. To learn more, please visit our Expert Elite website.

Need installation help?

Start with some of our most frequented solutions to get help installing your software.

Ask the Community