| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 6494 人关注过本帖, 1 人收藏
标题:如何让MsgBox弹出窗口在桌面的最前面?
只看楼主 加入收藏
mayong123
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2008-10-30
收藏(1)
 问题点数:0 回复次数:7 
如何让MsgBox弹出窗口在桌面的最前面?
Dim Msg, Style, Response, MyString
    Msg = sData '定义消息文本
    Style = vbYesNo + vbQuestion + vbDefaultButton1 ' 定义按钮
    Response = MsgBox(Msg, Style)
    If Response = vbYes Then ' 用户按下“是”
    Printer.FontName = "黑体"
    Printer.FontSize = 12
    Printer.ScaleMode = vbTwips
    Printer.Zoom = 100
    Printer.Print Msg ' 完成某操作
    Printer.EndDoc
    Else ' 用户按下“否”
    MyString = "No" ' 完成某操作
    End If

这段程序会弹出一个需要打印的窗口,如有其它程序时该窗口会被盖住,如何让它在所有程序前面显示。。。谢谢。。
搜索更多相关主题的帖子: MsgBox 窗口 最前 
2008-11-08 16:50
我是菜鸟哦
Rank: 6Rank: 6
等 级:贵宾
威 望:22
帖 子:921
专家分:209
注 册:2007-5-4
收藏
得分:0 
MsgBox "", 65536

偶是菜鸟鸟偶惧WHO?!!!!
2008-11-08 16:57
mayong123
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2008-10-30
收藏
得分:0 
没看懂。。。不太会用。。。能不能给个完整代码。。。谢谢!!!
直接测试好像也不行???
2008-11-08 18:12
我是菜鸟哦
Rank: 6Rank: 6
等 级:贵宾
威 望:22
帖 子:921
专家分:209
注 册:2007-5-4
收藏
得分:0 
不能吗?我没试,你去看看MSGBOX的函数参数,百度VB MSGBOX

偶是菜鸟鸟偶惧WHO?!!!!
2008-11-08 18:29
我是菜鸟哦
Rank: 6Rank: 6
等 级:贵宾
威 望:22
帖 子:921
专家分:209
注 册:2007-5-4
收藏
得分:0 
我错了,应该是4096
MSGBOX "内容",4096

偶是菜鸟鸟偶惧WHO?!!!!
2008-11-08 19:24
mayong123
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2008-10-30
收藏
得分:0 
直接测试可以了。。。
2008-11-08 19:33
mayong123
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2008-10-30
收藏
得分:0 
Dim Msg, Style, Title, Response, MyString
    Msg = sData '定义消息文本
    Style = vbYesNo + vbQuestion + vbDefaultButton1 + 4096 ' 定义按钮
    Title = "打印"
    Response = MsgBox(Msg, Style, Title)
    If Response = vbYes Then ' 用户按下“是”
    Printer.FontName = "黑体"
    Printer.FontSize = 12
    Printer.ScaleMode = vbTwips
    Printer.Zoom = 100
    Printer.Print Msg ' 完成某操作
    Printer.EndDoc
    Else ' 用户按下“否”
    MyString = "No" ' 完成某操作
    End If

这样用后是在最前的了,但为什么不是默认选中该窗口的???
还要用鼠标选中,才能确定打印???

谢谢了。。。
2008-11-08 19:40
costar
Rank: 1
等 级:新手上路
帖 子:4
专家分:3
注 册:2010-5-12
收藏
得分:0 
为何不直接用vbSystemModal(=4096)?记数字有那么好记就不要定义这些助记符了;初学这个,突然搞出个4096,一开始还真不知道什么意思....
2010-05-25 22:30
快速回复:如何让MsgBox弹出窗口在桌面的最前面?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.032805 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved