application.inputbox 选择单元格区域，未输入内容时，点取消确定出错，如何判断提示

xuxiake111

Sub tt()
Dim a As Range
Set a = Application.InputBox("请选择", "选择", , , , , , 8)
End Sub
想要通过判断点击确定和取消的返回值，来进行友好提示，提示  请选择区域等内容。这个应该如何判断。谢谢
点击确定出现第一张图片，点击取消出现第二张图片内容