Dim sName As String sName = Dir$(App.Path) Do While LenB(sName) Label1.Caption = Label1.Caption & sName & vbNewLine sName = Dir$ Loop
Vous n’avez pas trouvé la réponse que vous recherchez ?