'使用类System.Diagnostics.Process就行了。Option Explicit OnOption Strict OnImports System.DiagnosticsModule Program Sub Main() Process.Start("notepad.exe","test.txt") Console.Write("按任意键退出 . . . ") Console.ReadKey(True) End SubEnd Module