การเปิดโปรแกรมอื่นๆ ผมอยากทราบวิธีการเขียนโปรแกรมเพื่อเปิดใช้งานโปรแกรมอื่นๆ อ่ะครับ

Private Sub cmdA_Click()
Shell "notepad C:\test.txt", vbNormalFocus 
End sub

Private Sub cmdA_Click()
Shell("NOTEPAD.EXE", AppWinStyle.MinimizedNoFocus)
End sub

  Private Declare Function ShellEx Lib "shell32.dll" Alias "ShellExecuteA" ( _
        ByVal hWnd As Integer, ByVal lpOperation As String, _
        ByVal lpFile As String, ByVal lpParameters As String, _
        ByVal lpDirectory As String, ByVal nShowCmd As Integer) As Integer

 ShellEx(Me.Handle, "Open", "ตำแหน่งรวมถึงชื่อ file ที่จะเปิด", "", "", 10)