如何用shell启动的程序不显示出来.就像用了hide属性一样!

不是有参数吗..

有什么参数...可以说清楚点吗?

shell "程序",vbHide

我想要的不是VBHide而是程序hide!请问怎么样才可以呢?

Option Explicit
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Const SW_HIDE = 0
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Private Sub Command1_Click()
Shell "Calc.exe", vbHide
End Sub

Private Sub Command2_Click()
Dim calcHwnd As Long
calcHwnd = FindWindow(vbNullString, "计算器")
If calcHwnd <> 0 Then
ShowWindow calcHwnd, SW_HIDE
End If
End Sub

高招,,,谢谢!

有一个问题是..你打开了n个计算器就会出现问题...(n &gt; 1)

会出什么问题?

或者不打开很多个计算器。直接编写一个程序，窗体标题为“计算器”，然后运行。
再运行6楼的语句，尽管打开了一个真正的计算器，FindWindow 返回的，可能是先前编写的假“计算器”的句柄。。