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

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

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

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

怎么可能有这种情况啊?

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

把你从发声到调用MSGBOX函数的代码都贴出来看看!
因为你说的问题几乎不可能~~~

汗,真没见过呢~~~

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