<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: iLogic: inputbox cancel in Inventor Forum</title>
    <link>https://forums.autodesk.com/t5/inventor-forum/ilogic-inputbox-cancel/m-p/7085948#M371196</link>
    <description>&lt;P&gt;Thanks Curtis.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;This cancel button is a problem always. In case I hit "CANCEL" the following code doesn't go through.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;Dim oDrawing As DrawingDocument
oDrawing = ThisApplication.ActiveDocument
Dim oSheet As Sheet
Dim i As Integer
xNOS = oDrawing.Sheets.Count
Err.Number = 0
100:
'myparam = InputBox("Prompt", "Title", "Default Entry")
'catch an empty string in the imput
i = 1
i = InputBox("Prompt", "Title", i)

MessageBox.Show("Message, i = " &amp;amp; i, "Title")
If i = 0 Then Goto 100:
oDrawing.Sheets.Item(i).Activate&lt;/PRE&gt;
&lt;P&gt;I request help.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;Thanks.&lt;/P&gt;</description>
    <pubDate>Tue, 16 May 2017 05:50:43 GMT</pubDate>
    <dc:creator>RoyWickrama_RWEI</dc:creator>
    <dc:date>2017-05-16T05:50:43Z</dc:date>
  </channel>
</rss>

