Asi deberia estar

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
 
' Espacio en blanco, u otros procedimentos
 
Private Sub Command1_Click()
Const stPath As String = "C:\Users\Administrador\Desktop\"
Dim archivo As String
    archivo = Dir(stPath & "*.msu")
    While archivo <> ""
    MsgBox (FName & archivo)
         ShellExecute Me.hwnd, "open", stPath & archivo, vbNullString, "C:\Users\Administrador\Desktop\", False
        archivo = Dir
    Wend
End 
 

Si, Podes hacerlo mediante las funciones de Visual Basic, Mediante File System Object (FSO) o la infalible: mediante api

http://foro.elhacker.net/programacion_visual_basic/esperar_al_final_de_la_ejecucion_de_otro_programa-t313877.0.html

Shell And Wait

vos lo dijiste, ese es el problema principal de todo, querer tirarse a hacer cosas que no tienen ni idea. hacer algo complejo que todavia no saben hacer un bucle o las funciones principales. pero no sos el unico casi todos aca son asi. ya te digo que el foro no es para venir a preguntar cada duda que te salga, para eso no sirve el foro.

yo directamente no respondo mas cuando veo estas cosas.y lamentablemente el foro parece lleno de spam.

ojala no te ofendas, ya que normalmente lo hacen y se "enojan", cuando uno lo que quiere es enseñarle a pescar y no darle el pescado, si te dan el pescado te sirve para un rato, sin embargo si aprendes a pescar te srive para siempre, espero que se entienda lo que quise decir.