Vbscript “如何制作vbs消息框”;“永远在最上面”;

Vbscript “如何制作vbs消息框”;“永远在最上面”;,vbscript,Vbscript,我遇到过一两篇关于这个话题的帖子,比如: 但这似乎不适用于“如果…”。。埃尔斯的论点。每当我尝试向脚本的第二行添加类似的内容时,就会收到WSH VBScript编译错误消息 这就是脚本,我正试图使它在屏幕上所有其他窗口出现后仍然可见。非常感谢您的帮助。谢谢 马丁 intAnswer = _ Msgbox(" Do you want to run FS Earth?", _ vbYesNo, " ") If intAnswer = vbYes Then Dim o

我遇到过一两篇关于这个话题的帖子,比如:

但这似乎不适用于“如果…”。。埃尔斯的论点。每当我尝试向脚本的第二行添加类似的内容时,就会收到WSH VBScript编译错误消息

这就是脚本,我正试图使它在屏幕上所有其他窗口出现后仍然可见。非常感谢您的帮助。谢谢

马丁

intAnswer = _
Msgbox("           Do you want to run FS Earth?", _
    vbYesNo, " ")

If intAnswer = vbYes Then

Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
objShell.Run("""D:\FS9\FS_Earth\fs_earth_link.exe""")
Set objShell = Nothing

Else    

End If   

您无法真正控制分层,因为其他窗口是独立的进程,而msgbox属于启动vbs的进程。

您无法真正控制分层,因为其他窗口是独立的进程,而msgbox属于启动vbs的进程。

我花了很长的5分钟阅读你的问题一次又一次……我觉得有点傻——我终于明白你在问什么了

目前,您无法在第二行添加任何内容,因为前三行代码实际上是跨多行的一条指令(使用下划线字符)

如果您按照以下方式重写代码,您当然可以在第1行和第2行之间添加任何您喜欢的内容:)


我花了整整5分钟的时间反复阅读你的问题……我觉得有点傻——我终于明白你在问什么了

目前,您无法在第二行添加任何内容,因为前三行代码实际上是跨多行的一条指令(使用下划线字符)

如果您按照以下方式重写代码,您当然可以在第1行和第2行之间添加任何您喜欢的内容:)


我给出的链接中的示例当然有效——消息框位于我随后打开的任何其他窗口的上方。你的意思是,因为我从vbs脚本中打开了另一个程序,它的工作方式就不同了?为什么会这样?(真正的问题!)。谢谢Martin在我看来,您正在开发fs_earth_link.exe应用程序,这很可能只是另一个没有父/子关系的进程。模态Msgbox对于它所属的进程来说是模态的。我给出的链接中的示例肯定有效-消息框位于我随后打开的任何其他窗口的上方。你的意思是,因为我从vbs脚本中打开了另一个程序,它的工作方式就不同了?为什么会这样?(真正的问题!)。谢谢Martin在我看来,您正在开发fs_earth_link.exe应用程序,这很可能只是另一个没有父/子关系的进程。模态Msgbox是它所属进程的模态。
intAnswer = Msgbox("Do you want to run FS Earth?", vbYesNo + vbSystemModal, " ")

If intAnswer = vbYes Then
    Dim objShell
    Set objShell = WScript.CreateObject( "WScript.Shell" )
    objShell.Run("""D:\FS9\FS_Earth\fs_earth_link.exe""")
    Set objShell = Nothing
Else    

End If