示例代码：

1． 打开记事本

   Private Sub Command1_Click()

    Shell "Notepad E:\VB练习\添加DTPicker控件.txt ", vbNormalFocus

   End Sub

注：NotePad后有空格

2． 打开QQ登陆界面

   Private Sub Command2_Click()

    Shell "D:\Program Files\Tencent\QQ2009\Bin\qq.exe", vbNormalFocus

   End Sub

3． 打开Word文档

   Private Sub Command3_Click(Index As Integer)

   Dim strDir As String

   strDir = "E:\VB练习\Test.doc"

   Select Case Index

   Case 0

         Shell "C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE " & strDir, vbHide

   Case 1

         Shell "C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE " & strDir, vbNormalFocus

   Case 2

         Shell "C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE " & strDir, vbMinimizedNoFocus

   Case 3

         Shell "C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE " & strDir, vbNormalNoFocus

   Case 4

         Shell "C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE " & strDir, vbMaximizedFocus

   End Select

   End Sub

注：C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE之后有空格

* 在开始->运行里面能执行的命令用shell函数也行

Shell的语法：Shell(PathName[，WindowStyle])。

　　PathName为必需参数。类型为String，它指出了要执行的程序名，以及任何需要的参数或命令行变量，也可以包括路径名。

　　WindowStyle为可选参数。Integer类型，指定在程序运行时窗口的样式。WindowStyle有以下这些值。

　　常量                   值        描述

VbHide                      0      窗口被隐藏，且焦点会移到隐式窗口。

VbNormalFocus         1      窗口具有焦点，且会还原到它原来的大小和位置。

VbMinimizedFocus     2      窗口会以一个具有焦点的图标来显示（缺省值）。

VbMaximizedFocus     3      窗口是一个具有焦点的最大化窗口。

VbNormalNoFocus     4      窗口会被还原到最近使用的大小和位置，而当前活动的窗口仍然保持活动。

VbMinimizedNoFocus 6     窗口会以一个图标来显示，而当前活动的窗口仍然保持活动。

总结一下，Shell就是一个打开应用程序的函数，所带的参数为样式参数。