تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] أرجوكم مساعة في أداة الليست بوكس
#1
السلام عليكم ورحمة الله وبركاته أما بعد أخواني أريد مساعدتكم بأداة الليست بوكس والسؤال هو كيف يمكنني ان أجعل ألitems بالليست بوكس 1 نفس اللي بالليست بوكس 2 السؤال سهل أعتقد أتمنا أن أجد إجابة
الرد }}}}
تم الشكر بواسطة:
#2
تفضل

PHP كود :
 For Each list2 As String In ListBox2.Items
            ListBox1
.Items.Add(list2)
 
       Next 
لحمد لله رب العالمين على كل شي
الرد }}}}
#3
شكراً لك أخي لكن أن قمت بالحذف من الليست بوكس 1 هل ينحذف من الليست بوكس 2 أرجوك إجابة
الرد }}}}
تم الشكر بواسطة:
#4
(20-08-15, 08:21 PM)فراس صلاح كتب : شكراً لك أخي لكن أن قمت بالحذف من الليست بوكس 1 هل ينحذف من الليست بوكس 2 أرجوك إجابة

لو كانو مرتبطين بمصدر واحد فنعم يتم الحذف من الكل ... اما بالطريقة  المكتوبة بمشاركة الاخ فلا .. حتى تعيد الاجراء.
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة: مبرمج بلا حدود
#5
شكراً لكم جزيلاً لكن وجدت طريقة لإضافة وحذف الITEMS المحددة لكن يجب أن يكون الليست بوكس في نفس الفورم وهذا هو الكود 
كود :
ListBox1.Items.Remove(ListBox1.SelectedItem)
لكن كيف أجعله يحدد ما حدده المستخدم في ليست بوكس في فورم آخر مثال كود 

كود :
FORM2.ListBox1.SelectedItem = LstOrder.SelectedIte

مع العلم أن الكود لم ينجح هل هناك طريقة لجعله ينجح ويعمل وشكراً لكم سلفاً
الرد }}}}
تم الشكر بواسطة:
#6
ممكن تستعين بدالة من نوع Listofstring تخزن ما تم تحديده وتستقبل النتيجة بفورم اخر.
ارجو ان اكون فهمت المطلوب.
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة: مبرمج بلا حدود
#7
سلام

كود :
Form2.ListBox1.SelectedIndex = ListBox1.SelectedIndex

موفقين
متغيب
الرد }}}}
تم الشكر بواسطة: مبرمج بلا حدود , سعود
#8
أخي الكريم الاستاذ"الطالب" هو يقصد اكثر من Item هل نستخدم selecteditems

هذي تجربتي
PHP كود :
Public Class Form1
    
Private Sub Form1_Load(sender As ObjectAs EventArgsHandles MyBase.Load
        Form2
.Left Me.Left Form2.Width
        Form2
.Top Me.Top
        Form2
.Show()
    
End Sub
    
Private Sub Form1_Move(sender As ObjectAs EventArgsHandles Me.Move
        Form2
.Left Me.Left Form2.Width
        Form2
.Top Me.Top
    End Sub
    
Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Form2
.ListBox1.Items.Clear()
        
Form2.ListBox1.Items.AddRange(Me.ListBox1.Items)
    
End Sub
    
Public lst As New List(Of String)
    Private Function 
sel()
        For 
0 To Form2.ListBox1.Items.Count 1
            
If lst.Contains(Form2.ListBox1.Items(t)) Then
                Form2
.ListBox1.SetSelected(tTrue)
            
End If
        
Next
    End 
Function

    Private 
Sub Button2_Click(sender As ObjectAs EventArgsHandles Button2.Click
        
For Each itm In ListBox1.SelectedItems
            lst
.Add(itm)
        
Next
        sel
()
    
End Sub
End 
Class 

وهذي لقطة
http://www.gulfup.com/?bWu7qy
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
#9
سلام

شكرا استاذ سعود على التنبيه

كود :
For i = 0 To ListBox1.Items.Count - 1
    Form2.ListBox1.SetSelected(i, ListBox1.GetSelected(i))
Next

موفقين
متغيب
الرد }}}}
تم الشكر بواسطة: سعود
#10
ماشاءالله تبارك الله .. كل فترة اتعلم منك اشياء جديدة  والاروع فيها تنفيذ مهام عدة باكواد قليلة.
انظر للاكواد والدوال عنديSmileSmileSmile
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة: الطالب


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعده فى تعديل كود خاص بالتكست بوكس نبيل فتحى 1 33 19-09-17, 03:33 PM
آخر رد: أبو نوره
  نص أرقام في تكست بوكس visualist2015 3 77 14-09-17, 05:48 PM
آخر رد: visualist2015
  [سؤال] كيفية نسخ النصوص من داخل ليست بوكس تنمية المعرفة 7 130 12-09-17, 11:15 PM
آخر رد: تنمية المعرفة
  [كود] استفسار داخل اليست بوكس عبدالرحمن المكاوي 3 84 11-09-17, 05:29 PM
آخر رد: سعود الشامان
  [VB.NET] السلام عليكم ارجوا المساعدة في التكست بوكس محمد بوقزاحة 1 53 10-09-17, 12:29 PM
آخر رد: سعود الشامان
  [VB.NET] مساعدة التكست بوكس محمد بوقزاحة 3 71 10-09-17, 03:31 AM
آخر رد: Rabeea Qbaha
  [سؤال] كود حفظ البيانات من التكست بوكس الي الحقل shingray 1 62 08-09-17, 04:53 PM
آخر رد: Amjad
  [سؤال] لو سمحتم عاوز كود لأظهار كود العميل في التيكست بوكس عند اختيار العميل من الكومبوبوكس ahmedgamal 4 153 05-09-17, 06:01 AM
آخر رد: ahmedgamal
  عدم ظهور بينات اسم اختاره من لست بوكس Abdelazez.Ahmad 10 216 04-09-17, 07:59 PM
آخر رد: سعود
  [سؤال] نسخ رابط الى التكست بوكس ابو روضة 3 153 04-09-17, 01:19 AM
آخر رد: ابو روضة

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


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