Como faço para abrir um arquivo associado a um programa?

 

O arquivo é language.dat

O programa é Bloco de notas

 

tentei assim Shell App.Path & "language.dat c:windowsotepad.exe"

É deste jeito mesmo só q vc inverteu. Vc tem q colocar primeiro o caminho do programa executável e depois o caminho do arquivo q vc quer abrir ok??

 

t+

Agora a dúvida é em relação ao local do arquivo. Parqa que especifique que está no diretóriodo programa devo utilizar app.path. Não funciona   

    Shell App.Path & "Notepad.exe  App.Path & "Arquivo.txt"

 

Você vai ter que verificar se existe no final do Caminho 0 "", pode ser que o caminho não tenha, então vc vai ter que incluir.
 
Dim Caminho as String
 
IF Right(App.Path,1) <> "" Then
    Caminho = App.Path & ""
Else
    Caminho = App.Path
End IF
 
Shell Caminho & "Notepad.exe  Caminho & "Arquivo.txt"

Só que tem um detalhe nessa sua linha, o Arquivo.txt e o Notepad.exe tem que está no mesmo lugar, para mudar isso crie uma nova variavel Caminho2.

Existe erros na expressão abaixo:

Shell Caminho & "Notepad.exe  Caminho & "Arquivo.txt"

NÃO FUNCIONOU