سؤال في listbox - نسخة قابلة للطباعة

سؤال في listbox - نسخة قابلة للطباعة

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

سؤال في listbox - خليلي - 03-03-13

السلام عليكم ورحمة الله
سؤال بسيط: لما أكتب كلمة في TextBox وتكون موجودة في ListBox, وأضغط على زر Button يغلق الفورم....كيف ذلك :confused:

أتمنى الإجابة بأسرع وقت :o

سؤال في listbox - Easy4ever - 03-03-13

أكتب الكود التالي في زر Button

كود :

[b][SIZE=4]

[/SIZE][/b][align=left][b][SIZE=4]For I = 0 To [color=#008000]ListBox1[/color].Items.Count - 1

[/SIZE][/b]

[b][SIZE=4]If [color=#800080]TextBox1[/color].Text = [color=#008000]ListBox1[/color].Items(I) Then

[/SIZE][/b]

[b][SIZE=4]Me.Close()

[/SIZE][/b]

[b][SIZE=4]End If

[/SIZE][/b]

[b][SIZE=4]Next[/SIZE][/b][/align]

* ملاحظة : استبدل ListBox1 باسم ListBox الموجوده لديك واستبدل TextBox1 باسم TextBox الموجوده لديك

سؤال في listbox - Sajad - 03-03-13

[COLOR="#800000"]السلام عليكم

اكتب في حدث الTextChanged للText هذا الكود:

PHP كود :

For Each item As String In ListBox1.Items
            If (TextBox1.Text.ToUpper() = item.ToUpper()) Then
                Application.Exit()
                Exit For
            End If
        Next 

بالتوفيق ان شاءالله[/COLOR]

سؤال في listbox - sooriaty03 - 03-03-13

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

سؤال في listbox - خليلي - 03-03-13

شكراً لكما (Easy 4ever) و (Sajed) وأتمنى لكما التوفيق

سؤال في listbox - ربيع - 03-03-13

نحمده ونصلي على رسوله الكريم

كود :

[align=left]If Not string.IsNullOrEmpty(textBox1.Text) And listBox1.FindString(textBox1.Text) > -1 Then End 

[/align]

سؤال في listbox - ربيع - 03-03-13

sajad كتب :السلام عليكم

اكتب في حدث الTextChanged للText هذا الكود:

PHP كود :

For Each item As String In ListBox1.Items If (TextBox1.Text.ToUpper() = item.ToUpper()) Then Application.Exit() Exit For End If Next

بالتوفيق ان شاءالله

لا اجد زر (شكرا) اسفل مشاركتك Sad

المعذرة

سؤال في listbox - Sajad - 03-03-13

[COLOR="#800000"]

DreamsDotNet كتب :لا اجد زر (شكرا) اسفل مشاركتك
المعذرة

السلام عليكم

بارك الله فيك اخي العزيز دعوة بظهر الغيب تكفي ان شاءالله واعتبر شكرك قد وصلت Smile

[/COLOR]