VB中Msgbox提示框代码“vbOKOnly”与“vbOKCancel”的区别

背景

在做机房系统退卡窗体时，出于要有良好的用户体验时，我觉得在选好卡号之后，点击确定，要提示一下用户，确定是否删除本卡，防止用户时候着急操作失误。

遇到的问题

当我最开始时编辑的代码是这样的

If MsgBox("是否真的要退卡？", vbOKonly, "退卡提示") = vbok Then
    MsgBox"退卡成功！", vbOKOnly, "提示"
end if

但是很快我发现了问题，由于提示框内只有一个“确定”按钮，那如果我想取消退卡，是不是点击右上角的“×”就可以了。但是事实并非如此，不管我点击“确定”还是点击“×”，代码都是按照“确定”进行下一步。我想这可不行啊，这样的话，那这个提示不就没有任何用处了嘛！所以我就自己琢磨，自己尝试，于是乎我将代码改成下面这样，问题就解决了。

If MsgBox("是否真的要退卡？", vbOKCancel, "退卡提示") = vbok Then
    MsgBox"退卡成功！", vbOKOnly, "提示"
end if

虽然就是将vbOkonly简单的换成了vbOKCancel,但是非常方便的解决了那个问题。现在如果不想退卡，只需要点击取消即可。

总结

当用vbOkonly时，弹出的窗体只有“确定”和“×”按钮，无论点击那个，都会按照vbOK的指令进行。

但是使用vbOkCancel时，弹出的窗体有“确定”、“取消”和“×”三个按键，这时的“×”才和“取消”按键一样，是取消该操作的过程。

小小的×，在不同的环境中还是有这么多的学问！