ترحيل من التكيست بوكس الي الليست بوكس

**Akram Galal** · مايو 1, 2013

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

تحية طيبة علي كل أعضاء المنتدى

أريد عمل فورمة بها زر يقوم بترحيل البيانات الموجودة في التيكست بوكس إلي الليست بوكس

عدة مرات

فمثلا إذا كتبنا في التيكست بوكس 1 وضغطنا علي الزر

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

وبعد ذلك كتبنا 2 وضغطنا علي الزر

يتم ترحيلها في الليست بوكس أسفل البيان المرحل من قبل

هكذا

1

2

وجزاكم الله خيراً .

تم تعديل مايو 1, 2013 بواسطه Akram Galal

**عبدالله باقشير** · مايو 1, 2013

السلام عليكم

Private Sub CommandButton1_Click()
If Len(Trim(Me.TextBox1)) Then
    Me.ListBox1.AddItem Me.TextBox1.Value
End If
End Sub

شاهد المرفق 2003

**إبراهيم ابوليله** · مايو 1, 2013

اخى الحبيب

عبد الله

بارك الله فيك

عمل رائع جدا

وكود متقن

نسأل الله الا يحرمنا من امثالك

الردود الموصى بها