[ddemed]

(23-05-17, 12:30 AM)alma2 كتب :

كود :

       Dim open As New OpenFileDialog With {.Filter = "Files *.dll|*.dll"}
       If open.ShowDialog = Windows.Forms.DialogResult.OK Then

           Dim fn As String = open.FileName
           MsgBox(fn)

       End If

اما استخراج مافيه في مسار ما لم افهمها

مثل ان يكون ملف rar وتستخرج ما فيه في مجلد ما