“取消”的值是什么啊？

Question

bh=InputBox("请输入编号")rs.Seek "=",bhIf rs.NoMatch then MsgBox"找不到！"这个代码运行后当我点击取消后，就显示“找不到”，请那位高手指点一下，如何判断用户在inputbox函数框中是按了确定还是取消？

Answer 1

如果用户单击 Cancel（取消），则InputBox函数返回一个长度为零的字符串 ("")，可以根据这个情况进行判断，如果BH=""，则用户按了“取消”键，但如果用户把输入的内容清空，这时按“确定”和按“取消”一样，都返回一个长度为的字符串。

Answer 2

Dim s
s = InputBox("请输入", "inputbox测试", 0)
Debug.Print(s)

If s = "" Then
MsgBox("您选择了取消按钮或× ")
Else
MsgBox("您选择了确定按钮")
End If