示例一
打开文件"C:\test.xls"，代码非常简单：
Dim
Proc As New Process '定义一个新的Process
Proc.File = "C:\test.xls" '指定要打开的文件
Proc.Start()
示例二
利用属性Verb可以设置打开的动作，不同的外部程序，支持的动作会不同，对于Excel文件，支持三个Verb动作：
Open: 打开，这也是默认的动作。
OpenAsReadOnly：以只读方式打开
Print：打印，完成打印后自动关闭
例如：
Dim
Proc As New Process
Proc.File = "C:\test.xls"
Proc.Verb = "Print" '指定动作
Proc.Start()
上面的代码将打开文件c:\test.xls，然后执行打印命令，打印结束后自动关闭Excel。
如果要获得某一文件类型支持的全部Verb动作，可以参考下面的代码：
Dim
Proc As New Process
Proc.File = "C:\test.txt"
For Each Verb As String in Proc.Verbs
Output.show(Verb)
Next
在命令窗口执行上面的代码，可以列出文本文件支持的verb动作。
示例三
下面的代码，列出了扩展名为Doc的文件所支持的动作。
Dim
Proc As New Process
Proc.File = "C:\test.doc"
For each Verb As String In Proc.Verbs
Output.Show(verb)
Next
示例四
下面的代码，调用记事本打开文件“c:\table.txt”。
Dim
Proc As New Process
Proc.File = "Notepad.exe" '指定要执行的文件
Proc.Arguments = "c:\table.txt" '指定命令行参数
Proc.Start()
示例五
通过WaitForInputIdle，可以等待程序启动结束并进入空闲状态，然后向程序发送按键信息。
例如：
Dim
Proc As New Process
Proc.File = "C:\table.txt"
Proc.Start
Proc.WaitForInputIdle() '等程序自动结束并进入空闲状态
Sendkeys.Send("I Like Foxtable") '发送按键信息
加好友 
发短信
Post By：2012/10/30 12:13:00 [显示全部帖子]
