QB64 PE and Inform PE numeric input box

[bplus]

@Willi Grundmann you may be interested to know QB64pe has _InputBox$()

Code: (Select All)

myNum = Val(_InputBox$("Demo _INPUTBOX$([title$][, message$][, defaultInput$])", "enter a number please", "10"))
Print "Your number squared is"; myNum ^ 2