منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم
كنت اريد تحويل هذا الكود من كود لل folderdialog الي open file dialog ممكن حد يساعدني.
هذا الكود المراد تحويله.

كود :

If FolderBrowserDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

            ' jpg

            For Each fi As IO.FileInfo In New IO.DirectoryInfo(FolderBrowserDialog1.SelectedPath).GetFiles("*.jpg")

                AddCheckBoxImage(FlowLayoutPanel1, fi.FullName)

            Next

            ' png

            For Each fi As IO.FileInfo In New IO.DirectoryInfo(FolderBrowserDialog1.SelectedPath).GetFiles("*.png")

                AddCheckBoxImage(FlowLayoutPanel1, fi.FullName)

            Next

        End If

شكرا

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

كود :

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

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

nin9e

ali.alfoly