Shell Execute Duda si es esta api

[xmbeat]

Bien lo que es que siempre he usado este tipo de Api para hacer un virus que parezca carpeta y que al ejecutarlo se habra la carpeta que describe el virus. el problema  radica en que siempre se habre una nueva ventana del Explorador cada que hago esto. no se si algun parametro de esta api puede hacer que se abra en la misma ventana que contiene el virus, caso contrario me dicen que apis se utilizan para dar el efecto

[xkiz ™]

Código: (vb) [Seleccionar]

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

Private Sub Command_Click()
    ShellExecute Me.hwnd, vbNullString, vbNullString, vbNullString, App.Path, 1

End Sub

asi?
o entendi cualkier cosa?