VBA：vbYesNo显示一个OK按钮，没有别的

Question

标题不言自明。

这是一个例子

这是我使用的代码行。

If MsgBox("Are you sure?", vbYesNo) = Yes Then Exit Sub

我也使用EXTRA! X-treme

Answer 1

我不得不猜猜那个额外！ X-treme（哇！夸张多了？！）正在搞乱vb常量，或者至少不尊重它们，如果它正在拦截对MsgBox函数的调用。

vbYesNo应该是一个常数数值4。

此外，不应将MsgBox的结果与Yes进行比较，而应将其与vbYes（数值为6）进行比较。

我认为你正确使用VBA（除了vbYes部分），所以这可能是一个额外的！ X-treme bug（或记录不足的功能）。

解决方案

If MsgBox("Are you sure?", 4) = 6 Then Exit Sub