inputboxのキャンセルボタンの条件分岐

dim Ipt as Variant
Ipt=inoutbox(“ユーザー名を入力して下さい”)

で未入力でOKボタンを押しても、キャンセルボタンを押しても

Ipt=””

同じ戻り値らしいです。
なのでキャンセルボタンで条件分岐したい場合は

if StrPtr(Ipt)=0 then

らしいです。