تقييم الموضوع :
  • 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 






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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تضبيط ادخال المعلومات من Rich box الي ال ListBox khaled12345 2 57 22-05-17, 08:50 AM
آخر رد: khaled12345
  باستخراج من قاعدة البيانات بشرط listbox items rabeh.ram 0 72 19-05-17, 01:56 PM
آخر رد: rabeh.ram
  اختيار عنصر عشوائي من Listbox Basil Abdallah 1 54 17-04-17, 01:38 AM
آخر رد: عبـدالله
  عندما يكون listbox فارغ اريد ان يكون لونه احمر مثلا الـ ـجارح 7 152 15-04-17, 09:23 PM
آخر رد: Amir_alzubidy
  كيف اضافة جميع item list فى subitem Mohamed20 3 95 11-03-17, 01:34 AM
آخر رد: مساعدة
  [VB.NET] مشكلة في فلترة في listbox 3asfa~mdmra 5 184 09-03-17, 01:55 PM
آخر رد: 3asfa~mdmra
Rainbow [كود] اضافه للمشروع التاريخ الميلادي والهجري محمد مسافر 11 421 04-03-17, 06:54 PM
آخر رد: محمد مسافر
  مشكلة صغيرة فى كتابة item الى xml Mohamed20 2 142 11-02-17, 01:27 AM
آخر رد: Mohamed20
  [سؤال] طريقة تعبئة listbox من ملف text وربطه برابط على الانترنت youssef1 10 399 11-02-17, 12:56 AM
آخر رد: hassan
  Random من listbox Mohamed20 9 312 01-02-17, 01:18 AM
آخر رد: Mohamed20

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


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