منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] ادخال نص - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] ادخال نص (/showthread.php?tid=2631)



ادخال نص - ابراهيم مراد - 21-04-14

السلام عليكم كيف ادخال نص من textbox1
الى listbox1
يعنى مثلا ال textbox1
مكتوب فيه
1
2
3
4
5
6
ولو فى سطر فاضى او مكرر يحذفه
و يدخالهم الى listbox1
ويكون بنفس الطريقه
الله يكرمكم


RE: ادخال نص - Sniper.ps - 21-04-14

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

تفضل أخي الكريم

كود :
Dim Lst = (From Line In TextBox1.Lines Select Line Where Trim(Line) <> "").Distinct.ToArray
ListBox1.Items.AddRange(Lst)

وفقك الله


RE: ادخال نص - ابراهيم مراد - 21-04-14

(21-04-14, 06:31 PM)Sniper.ps كتب : وعليكم السلام ورحمة الله وبركاته

تفضل أخي الكريم

كود :
Dim Lst = (From Line In TextBox1.Lines Select Line Where Trim(Line) <> "").Distinct.ToArray
ListBox1.Items.AddRange(Lst)

وفقك الله

اشكرك اخى الكريم الله يسعدك ويوفقك يا طيب


RE: ادخال نص - alimoi79 - 28-04-14

كود رائع مشكوووووررررر