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



كود :
Form2.ListBox1.Items.AddRange(Me.ListBox1.Items) 'Me تعني الفورم رقم واحد
       Form2.ListBox2.Items.AddRange(Me.ListBox2.Items)
الرد }}}
#3
السلام عليكم
ممكن توضيح للكود واين يتم وضعه
الرد }}}
تم الشكر بواسطة: asemshahen5
#4
ممكن في زر بوتون

كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Form2.ListBox1.Items.AddRange(Me.ListBox1.Items)
       Form2.ListBox2.Items.AddRange(Me.ListBox2.Items)
       Form2.Show()
   End Sub

لكن هل تقصد شي ثاني لا ادري؟اذا تقصد شيئ ثاني ياريت تشرحه اخي
الرد }}}
تم الشكر بواسطة: asemshahen5
#5
اولا اشكرك جداااا
ثانيا اقصد الزر فى ايا من الفورم الاصلى ام المنسوخ به
الرد }}}
تم الشكر بواسطة: asemshahen5
#6
أخي هذا يعتمد على آلية عمل برنامجك , يعني متى تريد ان تكون القيم مطابقة؟ هل عند فتح الفورم الثاني ام عند حصول شرط معين ام عند ادخال البيانات

على سبيل المثال الكود السابق كنت اقصد به الفورم الاساسي

كود :
Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Form2.ListBox1.Items.AddRange(Me.ListBox1.Items)
       Form2.ListBox2.Items.AddRange(Me.ListBox2.Items)
       Form2.Show()
   End Sub
End Class



ممكن ايضآ بهذا الشكل عن طريق فورم 2




كود :
Public Class Form2

   Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       Me.ListBox1.Items.AddRange(Form1.ListBox1.Items)
       Me.ListBox2.Items.AddRange(Form1.ListBox2.Items)
   End Sub
End Class


أي عند فتح الفورم الثاني يتم ملئ البيانات
وكما قلت لك يعتمد على آلية عمل برنامجك
الرد }}}
تم الشكر بواسطة: asemshahen5
#7
الكود لايعمل
الرد }}}
تم الشكر بواسطة: asemshahen5
#8
PHP كود :
   Private Sub Button2_Click(sender As ObjectAs EventArgsHandles Button2.Click
        Dim frm 
As New Form2
        Dim arr 
As New ArrayList
        arr
.Clear()
 
       arr.AddRange(ListBox1.Items)
 
       frm.ListBox1.Items.AddRange(arr.ToArray)
 
       frm.Show()
 
   End Sub 
الرد }}}
#9
الف مليون شكر صديقى العزيز
الرد }}}
تم الشكر بواسطة: asemshahen5



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


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