Отмена InputBox - VB

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

Здравствуйте! Возникла проблема аналогичная вот этой: Как запрограммировать Кнопку отмены в inputbox В данном случае InputBox передает новое значение в ячейку. Ячейка может быть пустой по этому вариант решения в вышеуказанной теме не подходит.

                    Листинг программы
                
If vrt10 (InputBox.Value) = "" Then

Можно ли инициировать событие завершения программы по нажатию "Cansel" или в крайнем случае вообще убрать кнопку "Cansel" (в этом случае по нажатии "ОК" будет передаваться значение по умолчанию)?

Решение задачи: «Отмена InputBox»

textual
                            Листинг программы 
                        
Dim s As String
s = InputBox("Введите текст")
MsgBox IIf(StrPtr(s) = 0, "Вы нажали Отмена", "Вы ввели текст: " & s)