Olá pessoal , sou novo no fórum e iniciante em VB , preciso saber como posso controlar o acesso a pastas e subpastas com a Tecla ENTER , no DIRLISTBOX pois só consigo acessar dando 2 CLicks em cima das pastas.

 

Obrigado.

Olá Gadu,

 

No evento KeyPress do DirListBox, coloque o seguinte código:

 

Private Sub Dir1_KeyPress(KeyAscii As Integer)

    If KeyAscii = 13 Then
        Dir1.Path = Dir1.List(Dir1.ListIndex)
    End If

End Sub

um abraço,

Sandro.