以下是引用fan0217在2006-1-16 12:03:00的发言: Dim stAppName As String stAppName = "calc.exe" Call Shell(stAppName, 1)