Ps utilizando el metodo que anteriormente dice alehawk yo lo hago así:
1. Declaro un textbox1 -> Se le asigna el dato para abrir el archivo.
2. Se declara el evento SelectedIndexChanged y dentro de este tengo el siguiente código.
Código Có:
Ver originalIf listview1.Items.Count > 0 Then
Dim i As Integer
For Each i In listview1.SelectedIndices
textbox1.Text = listview1.Items(i).SubItems(1).Text
Next
End If
3. Se declara el evento MouseDoubleClick -> Ejecuta la acción cuando se da doble click en el item, así:
Código Có:
Ver originalDim visor As String = "WinWord.exe " -> Ejemplo word
visor = visor + textbox1.Text
Try
Call Shell(visor, AppWinStyle.MaximizedFocus)
Catch ex As Exception
_metodos.mensajes(1, ex.Message, "Error", MessageBoxIcon.Error)
End Try
y así se abre la aplicación con doble click en el archivo.
Saludos.