السلام عليكم ورحمة الله
سؤال بسيط: لما أكتب كلمة في TextBox وتكون موجودة في ListBox, وأضغط على زر Button يغلق الفورم....كيف ذلك :confused:
أتمنى الإجابة بأسرع وقت :o
أكتب الكود التالي في زر 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 الموجوده لديك
[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]
وعليكم السلام ورحمة الله وبركاته
جزاكم الله خيرا وزادكم علما وقدرا
بالتوفيق
شكراً لكما (Easy 4ever) و (Sajed) وأتمنى لكما التوفيق
نحمده ونصلي على رسوله الكريم
كود :
[align=left]If Not string.IsNullOrEmpty(textBox1.Text) And listBox1.FindString(textBox1.Text) > -1 Then End
[/align]
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
بالتوفيق ان شاءالله
لا اجد زر (شكرا) اسفل مشاركتك
المعذرة
[COLOR="#800000"]DreamsDotNet كتب :لا اجد زر (شكرا) اسفل مشاركتك
المعذرة
السلام عليكم
بارك الله فيك اخي العزيز دعوة بظهر الغيب تكفي ان شاءالله واعتبر شكرك قد وصلت
[/COLOR]