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
Original Author: Ulli
Code
'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
Loading Comments ...
Comments
No comments have been added for this post.
You must be logged in to make a comment.