• Home
 · 
• String Manipulation
 · 
• TriState InputBox

TriState InputBox

With the InputBox you cannot distinguish between the cases
a:- Cancel clicked
b:- nothing entered and OK clicked
because in both cases the returned string is a vbNullString
There is a simple trick however as is shown here

Rate TriState InputBox

• 1
• 2
• 3
• 4
• 5

(14(14 Vote))

'With the InputBox you cannot distinguish between the cases
'
'  a:- Cancel clicked
'  b:- nothing entered and OK clicked
'
'because in both cases the returned string is a vbNullString
'
'There is a simple trick however as is shown in this little code snippet:
 Dim UserInput As String
  UserInput = InputBox("Please type in nothing or some text and click OK or Cancel", "Distinguish")
  Select Case True
   Case StrPtr(UserInput) = 0
    MsgBox "You clicked Cancel"
   Case Len(UserInput)
    MsgBox "You typed """ & UserInput & """ and clicked OK"
   Case Else
    MsgBox "You typed nothing and clicked OK"
  End Select
End Sub