el dir y el teclado (UNA AYUDITA!)

DESESPERADO
13 de Diciembre del 2003
me explico haber si se me puede entender:
si tenemos un elemento dir, y hacemos click con el raton sobre una carpeta, se muestra las subcarpetas que contiene, pero claro le problema que tengo es que no se hacerlo con el enter (keyascii = 13) y la verdad que me tiene un poco hasta las nerices

Juan
13 de Diciembre del 2003
Prueba esto:

Private Sub Dir1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then Dir1.Path = Dir1.List(Dir1.ListIndex)
End Sub

DESESPERADO
13 de Diciembre del 2003
muchas gracias !!!!!!!!!!!!!!!