منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - اختيار عناصر من الليست بوكس وإضافتها إلى قاعدة البيانات

السلام عليكم
الإخوة الأعزاء

لدي فورم يحتوي على:

TextBox1 للبحث عن العناصر المطلوبة
CheckedListBox1 مرتبطة بقاعدة بيانات أكسس ويتم تعبئتها منها
TextBox2 يتم نقل العناصر المختارة إليها مع الفصل بينها بعلامة ;
Button1 لإضافة العناصر المختارة إلى قاعدة البيانات

والذي أريده:
معرفة الطريقة لاختيار عنصر أو أكثر من الليست بوكس وإضافتها إلى قاعدة البيانات Tab2
"Tsneefat_Names"

مرفق مثال للمطلوب

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

PHP كود :

Dim names As New List(Of String)
For Each c In CheckedListBox1.CheckedItems
    names.Add(c.item("names"))
Next
TextBox2.Text = String.Join("; ", names) 

PHP كود :

Dim Tab2cmd = New OleDbCommand("insert into tab2(Tsneefat_Names) values(@names) ", con)
Tab2cmd.Parameters.AddWithValue("@names", String.Join("; ", names))
con.Open()
Tab2cmd.ExecuteNonQuery()
con.Close() 

(11-01-18, 03:32 AM)طالب برمجة كتب : [ -> ]
PHP كود :

Dim names As New List(Of String) For Each c In CheckedListBox1.CheckedItems names.Add(c.item("names")) Next TextBox2.Text = String.Join("; ", names)

PHP كود :

Dim Tab2cmd = New OleDbCommand("insert into tab2(Tsneefat_Names) values(@names) ", con) Tab2cmd.Parameters.AddWithValue("@names", String.Join("; ", names)) con.Open() Tab2cmd.ExecuteNonQuery() con.Close()

سلمتَ أخي الكريم طالب برمجة
وأود تفعيل خاصية
TextBox1_TextChanged
بحيث إذا كتبت بعض الحروف في TextBox1 تظهر لي العناصر التي تشتمل على هذه الحروف
كذلك أود تفعيل زر Enter
بحيث إذا ضغطت عليه يتم اختيار العنصر المراد دون اللجوء إلى الماوس
وإذا كان العنصر مختارا وضغطت Enter يتم إلغاء اختيار هذا العنصر
وشكرا

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

waelalmsry75

طالب برمجة

waelalmsry75