要解决这个问题，您必须使用 Windows API 去呼叫 MessageBox Function，它的使用方法、外观和 MsgBox 的结果完全相同，但是它却不会中断一些 Background 的处理作业！

在以下的范例中，您要在 Form 中加入一个 Label、二个 CommandButton 及一个 Timer，不更改任何属性。

'在声明区中加入以下声明：

Private Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long

'加入以下程序码：

Private Sub Command1_Click()
MsgBox "计时器停掉了！", 64, "VB 的讯息框"
End Sub

Private Sub Command2_Click()
MessageBox Me.hwnd, "注意！计时器还在跑！", "API 的讯息框", 64
End Sub

Private Sub Form_Load()
Me.TimerInterval = 1000
Label1.Caption = "目前的时间是：" & Time
End Sub

Private Sub Timer1_Timer()
Label1.Caption = "目前的时间是：" & Time
End Sub

(责任编辑：admin)

• ·API函数详细解释
• ·Access从剪切版里复制和粘贴数据
• ·Access利用api实现打开/关闭光驱
• ·应用程序开机自动启动（注册表操作技巧
• ·Access VBA 判断网络是否连通的多种办
• ·什么是ADP,了解ADP的优缺点
• ·优秀产品大全--通用票据打印软件(新)
• ·[技巧分享]多条Shell语句执行导致判断
• ·在access中可以调用API函数GetFileInfo
• ·Access API集中营--增加临时使用的字体
• ·API ShellExecute 功能说明及应用示例
• ·在VB中使用API函数(什么是API? )
• ·API实现完美的图片出现效果（转）
• ·API 设置调整系统当前时间
• ·如何检测以及设置键盘状态
• ·不关闭当前数据库COPY当前数据库