Question

关于VB中，MSGBOX函数运行的问题，请高手赐教。

在我的程序中需要使用MSGBOX函数，可是有时试运行结果确是：
1、只出现一声警告铃声；
2、屏幕上没有提示框的出现，好像已经默认点击了“确认”键。
问题，如何让MSGBOX函数做的提示框平稳的每次都出现，等待用户点击。
程序如下：
Dim Z As Integer
Z = MsgBox("伙计，当前没有记录！", vbExclamation + vbOKOnly, "提示")
或者直接：
MsgBox("伙计，当前没有记录！", vbExclamation + vbOKOnly, "提示")
两种都调试过了，每次都会出现没有提示框出现的问题，已经默认点击了“确定”。虽然不影响程序程序运行，但没有起到提示的作用啊。我都准备自己编辑窗体来提示了，请高手赐教。

Answer 1

这个当然啦,
你的语句是:
MsgBox("伙计，当前没有记录！", vbExclamation + vbOKOnly, "提示")

根本都不需要加括号,你怎么加了.
还有
Z = MsgBox
不需要这样写的,简简单单用个IF条件语句不就成事了吗,呵呵

Answer 2

怎么可能有这种情况啊？

应该是你的系统有问题吧，我还从来没遇到过说MsgBox不显示就默认点确定了。不可能的，你要么重装一次系统，要么检查一下VB的补丁，我用的SP6。

Answer 3

还有
Z
=
MsgBox
不需要这样写的;提示"伙计，当前没有记录,你怎么加了;)
根本都不需要加括号！",
vbExclamation
+
vbOKOnly,
"这个当然啦,
你的语句是:
MsgBox("

Answer 4

private
sub
command1_click()
'这里都删除了
if
某变量=设定的正确结果
then
mystring="结果正确"
else
mystring="结果错误"
end
if
x=msgbox(mstring)
end
sub

Answer 5

汗，真没见过呢~~~

是不是你的系统有问题？或者VB有问题？我的测试环境：XP SP2 + VB6.0 SP6

Answer 6

我还从来没遇到过说MsgBox不显示就默认点确定了？
应该是你的系统有问题吧怎么可能有这种情况啊。不可能的，你要么重装一次系统，要么检查一下VB的补丁，我用的SP6