[ali.alfoly]

تفضل اخي الكريم

كود :

With Me.OpenFileDialog1
            '- خاصية الفلتر
            .Filter = "Image files (*.jpg;*.png)|*.jpg;*.png|All files (*.*)|*.*"
            '- لتممكن من تحديد اكثر من ملف
            .Multiselect = True
            '- اظهار الرسالة
            .ShowDialog()
        End With

        '- التاكد من ان اختيار ملفات
        If Me.OpenFileDialog1.FileNames.Count > 0 Then
            For Each fi As String In Me.OpenFileDialog1.FileNames
                AddCheckBoxImage(FlowLayoutPanel1, fi)
            Next
        End If

ولفهم الاداة يمكنك مراجعة الموضوع التالي

معلومة ::: OpenFileDialog