Dir y File Choose

' Gambas class file

Public Sub _new()

End

Public Sub Form_Open()
LabelNombreDirectorio.AutoResize = True 'para que muestre toda la ruta aunque sea muy larga
End


Public Sub DirChooser1_Change()

LabelNombreDirectorio.Text = DirChooser1.SelectedPath

End

Public Sub FileChooser1_Change()

  labelNombreElegido.text = FileChooser1.SelectedPath

End