1秒后自动关闭msgbox消息框示例
时 间:2012-12-22 08:32:38
作 者:风行 ID:16058 城市:江阴
摘 要:这样设计的目的是少了一步每次点确定的麻烦操作。
正 文:
'1秒后自动关闭msgbox 1000 1秒可自行设置
Private Declare Function MessageBoxTimeout Lib "user32" Alias "MessageBoxTimeoutA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long, ByVal wlange As Long, ByVal dwTimeout As Long) As Long
Private Sub 保存_Click()
MessageBoxTimeout Me.hwnd, "保存成功", "Tips", vbInformation, 0, 1000
End Sub
演 示:
Access软件网官方交流QQ群 (群号:483923997) Access源码网店
常见问答:
技术分类:
源码示例
- 【源码QQ群号19834647...(12.17)
- 【Access源码示例】按输入...(05.30)
- Access一打开就显示查询结...(05.27)
- 【Access定时打开窗体】A...(05.21)
- 【Access更新查询】更新查...(05.15)
- 【Access小作品】简单的待...(04.30)
- 【Access窗体导出PDF】...(04.08)
- 【Access窗体导出PDF】...(04.07)
- Access两种方式实现即时更...(03.01)
- Access隐藏与显示lacc...(01.12)
学习心得
最新文章
- SQL代码如何连接上下行【书常见问...(06.02)
- Access窗体查询制作步骤第四课...(05.31)
- 【Access源码示例】按输入的数...(05.30)
- Access运行追加查询时的常见错...(05.30)
- Access利用列表框多选进行批量...(05.27)
- Access一打开就显示查询结果;...(05.27)
- 【Access选择查询】用Acce...(05.24)
- 【Access Format取值示...(05.22)
- 【Access定时打开窗体】Acc...(05.21)
- 【Access更新查询】通过更新查...(05.20)