| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何自动关闭提示框 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179966) |
| -- 作者：zyxhx -- 发布时间：2022/9/21 10:39:00 -- 如何自动关闭提示框 老师，如果我想让提示信息显示后不用单击确定按钮自动退出提示框，以下代码应该如何修改？ 如：MessageBox.Show("保存成功!","提示信息",MessageBoxButtons.OK)
|
| -- 作者：有点蓝 -- 发布时间：2022/9/21 10:43:00 -- 没有办法。设计一个模式窗口替代MessageBox，在窗口计时器事件里写代码延迟1秒关闭窗口 |
| -- 作者：zyxhx -- 发布时间：2022/9/21 11:11:00 -- 老师，百度上的这个方法可用吗？如果类似方法用fxtable能不能实现？ https://wenku.baidu.com/view/160e54044b2fb4daa58da0116c175f0e7cd1192d.html
[此贴子已经被作者于2022/9/21 11:28:22编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2022/9/21 11:37:00 -- 和2楼设置模式窗口一样的道理，为什么不要更简单的方法？ |
| -- 作者：zyxhx -- 发布时间：2022/9/21 11:42:00 -- 嗯，老师这个方法的确简单多了。 |
| -- 作者：aix -- 发布时间：2022/9/21 11:51:00 -- 1、在“管理项目-全局代码”增加以下代码： \'Message定时自动关闭 Public Declare Function MessageBoxTimeout Lib "user32" Alias "MessageBoxTimeoutA" (ByVal hwnd As Integer, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Integer, ByVal wlange As Integer, ByVal dwTimeout As Integer) As Integer 2、原来的代码改为： MessageBoxTimeout(BaseMainForm.Handle, "内容123", "提示:", vbOK, 0, 3000) \'3秒后自动关闭窗口
|