[asto]

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

نعمل فورم1 و فورم 2 و لست في احدهما مثلا list1  و تكست 1 في الآخر مثلا

و نكتب هذا الكود كمثال :

كود :

Private Sub List1_Click()
g = List1.ListIndex
Form2.Show
Form2.Text1.Text = List1.List(g)
End Sub