README.md
December 4, 2022 ยท View on GitHub
Description
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
More Info
| Submitted On | |
| By | ULLI |
| Level | Intermediate |
| User Rating | 4.9 (69 globes from 14 users) |
| Compatibility | VB 6.0 |
| Category | String Manipulation |
| World | Visual Basic |
| Archive File |
Source 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