Как отследить нажатие кнопки Cancel или Escape при вызове InputBox? - VB

Формулировка задачи:

Подскажите, как отследить нажатие кнопки Cancel или Escape при вызове данной функции? Как известно, при Cancel он возвращает пустое значение и соответственно затирает в ячейке ту информацию, которая была до этого...(использую в Гриде двойным кликом для изменения информации в ячейке на лету). Спасибо.

Решение задачи: «Как отследить нажатие кнопки Cancel или Escape при вызове InputBox?»

textual
                            Листинг программы 
                        

                            Private Sub TXT_Click()
Dim str As String
str = InputBox('Введите Значение', 'Просто просьба', TXT.Text)
If Trim(str) <> '' Then
    TXT = str
End If
End Sub
                        