Listbox'ta tıkladığım satırda F8 tuşuna basınca c:\a.jpg dosyasını açabilir miyim?

[mücahitayan]

Listbox'ta tıkladığım satırda F8 tuşuna basınca c:\a.jpg dosyasını açabilir miyim?

 

[Levent Menteşoğlu]

Aşağıdaki kodu listboxa yazarak deneyin.

Private Sub ListBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 119 Then
CreateObject("Shell.Application").Open "c:\a.jpg"
End If
End Sub