تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اضافه item الى listbox
#1
اريض اضافه file فى listbox اذا كان هذا الملف موجود مسبقن فى listbox لا يتم اضافته
جربت هذا الكود
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        OpenFileDialog1.ShowDialog()
        If ListBox1.Items.Add(OpenFileDialog1.FileName) Then
            MsgBox("خطاء")

        Else
            ListBox1.Items.Add(OpenFileDialog1.FileName)
        End If
    End Sub
الرد }}}}
تم الشكر بواسطة:
#2
محمد كتب :اريض اضافه file فى listbox اذا كان هذا الملف موجود مسبقن فى listbox لا يتم اضافته
جربت هذا الكود
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        OpenFileDialog1.ShowDialog()
        If ListBox1.Items.Add(OpenFileDialog1.FileName) Then
            MsgBox("خطاء")

        Else
            ListBox1.Items.Add(OpenFileDialog1.FileName)
        End If
    End Sub
كود :
If Listbox1.Items.Contains(OpenFileDialog1.FileName) Then
            MsgBox("Cannot add the File " & OpenFileDialog1.FileName, MsgBoxStyle.Information)
        Else
            Listbox1.Items.Add(OpenFileDialog1.FileName)
الرد }}}}
تم الشكر بواسطة:
#3
كود :
Dim s As String = "0"
        For i As Integer = 0 To ListBox1.Items.Count - 1
            If ListBox1.Items.Item(i) = OpenFileDialog1.FileName Then
                s = "1"
            End If
        Next
        If s = "0" Then
            ListBox1.Items.Add(OpenFileDialog1.FileName)
        Else
            MsgBox(OpenFileDialog1.FileName & "موجود مسبقا لايمكن اضفاتو", MsgBoxStyle.Critical)
        End If
الرد }}}}
تم الشكر بواسطة:
#4

السلام عليكم ورحمة الله وبركاته





وهذه طريقة أخرى لاختيار مجموعة ملفات دفعة واحدة

PHP كود :
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click

        Dim ofd 
As New OpenFileDialog
        ofd
.Title "إختيار ملفات"
        
        
ofd.Multiselect True
        
        ofd
.Filter "All files (*.*)|*.* | Images (*.jpg;*.bmp;*.png;*.gif;*.tiff)|*.jpg;*.jpeg;*.bmp;*.png;*.gif;*.tif;*.tiff"
        
ofd.FilterIndex 2

        
If ofd.ShowDialog Windows.Forms.DialogResult.OK Then

            
For Each f As String In ofd.FileNames
                
If Not Me.ListBox1.Items.Contains(fThen
                    Me
.ListBox1.Items.Add(f)
                
End If
            
Next

        End 
If

    
End Sub 






السلام عليكم ورحمة الله وبركاته
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] اريد طريقة لمنع تكرار عناصر listbox riad21 4 380 13-10-17, 10:03 AM
آخر رد: مصطفي الشكلي
  [VB.NET] كيفية جلب مستند نصي من Resources الي Listbox e-coder 3 107 04-09-17, 07:28 AM
آخر رد: سعود
  نقل عناصر listbox الى textbox بـــكوما مفصولة srca100050 13 340 26-08-17, 06:33 PM
آخر رد: سعود
  مشكله في اضافه البيانات gnoon 11 283 18-08-17, 01:42 AM
آخر رد: gnoon
  [VB.NET] كيف اوقف التايمر بعد تحديد الكل في listbox ? e-coder 9 248 31-07-17, 01:53 AM
آخر رد: ابو ليلى
  [VB.NET] كود جلب id الجروبات الى listbox A-R 2 139 02-07-17, 02:54 PM
آخر رد: A-R
  [VB.NET] اضافة كلمة في جميع اسطر listbox mervandzz 1 149 19-06-17, 05:03 PM
آخر رد: silverlight
  تضبيط ادخال المعلومات من Rich box الي ال ListBox khaled12345 2 167 22-05-17, 08:50 AM
آخر رد: khaled12345
  باستخراج من قاعدة البيانات بشرط listbox items rabeh.ram 0 189 19-05-17, 01:56 PM
آخر رد: rabeh.ram
  اختيار عنصر عشوائي من Listbox Basil Abdallah 1 128 17-04-17, 01:38 AM
آخر رد: عبـدالله

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم