再来一个问题~如何控制MESSAGEBOX弹出的窗口？？？

比如需要设置一些窗口属性~~~象始终置顶什么的~~~~该怎么做？？需要获得它的句柄，但是他弹出来后程序又中断了~~~~~该怎么做？？

解决方案 »

  1.   

    一种办法是自己设计类似的窗口，这样就可以用setwindowlong进行控制了。
    SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE 'Put Forward
      

  2.   

    置最前端用kissoflife的就行了但是彈出程序中斷是什麼意思？
      

  3.   

    试试这个'引用Windows Script Host Object Model    Dim objShell As New IWshRuntimeLibrary.WshShell
        objShell.Popup "对话框不会中断程序的运行，30秒后自动关闭", 30, "MsgBox", 33
      

  4.   

    讓msgbox定時關閉很容易做到呀，問題是怎麼個程序中斷？
      

  5.   

    可以API的MessageBox这个函数(函数可能问题)但是API可以异步执行!!!
      

  6.   

    哦~~可能是我没有注意~~MESSAGEBOX有参数可以让弹出对话框过后程序直接继续运行？？我回去看看~~~~~~不好意思哈！
    '引用Windows Script Host Object Model    Dim objShell As New IWshRuntimeLibrary.WshShell
        objShell.Popup "对话框不会中断程序的运行，30秒后自动关闭", 30, "MsgBox", 33
    '这是什么东东~~~没有过呢~~~惭愧~~~~~
      

  7.   

    用wh_cbt钩子获得MESSAGEBOX窗口句柄
      

  8.   

    子类化你的主窗口,当你的窗口弹出msgbox的时候,你的窗口会收到一条WM_ACTIVATE的消息,这时你就有机会执行你的代码了.你可以用GetActiveWindow得到msgbox 的窗口,然后setwindowpos之类
      

  9.   

    me.visibled=false
    msgbox "Hello!",16,"Test:"
    me.visibled=true