[Resolvido] Comando Shell

Olá!

Seguinte:

estou fazendo um programa q possibilita acessar e executar mais de uma centena de opções (algumas, inclusive, ocultas e desconhecidas da maior parte das pessoas) no Windows XP. Eu utilizo a função Shell para executar os programas como o teclado virtual (osk.exe) e calculadora (calc.exe), por exemplo.

O problema: arquivos que não possuam a extensão .exe ou .bat, como por exemplo, o arquivo appwiz.cpl (que abra a janela Adicionar/remover programas) ou a extensão .msc não funcionam (e várias opções e aplicativos do Windows possuem essas extensões...). Qdo rodo o aplicativo, o VB dah o seguinte erro: Run-time error 53: File not found.

Detalhe: colocar a extensão (.bat, .exe, .cpl) é opcional, pois, por exemplo, para executar a calculadora, basta utilizar Shell ("calc") sem extensão. Tentei adicionar o caminho do arquivo .cpl e também naum funfa.

Alguem tem alguma ideia de como executar arquivos que naum sejam .exe e .bat???

O código usado (e q funciona) eh muito simples:

Private Sub cmdExecutar_Click()

Shell ("osk")

End Sub

Mas o mesmo naum funciona para:

Private Sub cmdExecutar_Click()

Shell ("appwiz.cpl")

End Sub