[aftfm]

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

كيف اتأكد من نص أو جزء من النص موجود بداخل اسطر اداة الكومبوبوكس

[asemshahen5]

PHP كود :

   Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        If ComboBox1.Items.Contains(TextBox1.Text) Then
            MsgBox("True")
        Else
            MsgBox("False")
        End If
    End Sub 


[aftfm]

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

لكن المطلوب جزء من السجل المكتوب على الكومبو

مثلا
قلم رصاص
قلم جاف
قلم حبر
مرسام

المطلوب في حالة تم اختيرا اي سطر من المكتوب فيه (قلم) تظهر رسالة نعم

أي كان هذا القلم

[ابراهيم ايبو]

السلام عليكم ورحمة الله وبركاته
اخي الكريم 
 من محاسن الصدف اني البارحة كنت اقرأ عن كلمة Like 
وقد وظفتها الان لك في ماتريد ان شاء الله فقط اريد ان اشير الى الاشارة نجمة فهي تعبر عن عدد غير معين من الحروف وقد وضعتها قبل وبعد حتى يمكن جلب اول كلمة من الـ Item او الكلمة الثانية 

كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim KK As String = ""
       For i As Integer = 0 To ComboBox1.Items.Count - 1
           If ComboBox1.Items(i) Like "*" & ComboBox1.Text & "*" Then
               KK = "موجود"
               Exit For
           Else
               KK = "غير موجود"
           End If
       Next
       MsgBox(KK)
   End Sub

لكن اخي لهذا الكود بعض العيوب وهو لو كتبت  اي حرف موجود في اي item سيعطيك موجود او حرفين لهما نفس التسلسل او ثلاثة او حتى فراغ واحد لانك تبحث بجزء والجزء يبدأ من حرف وانت صاعد لذلك يفضل كتابة كلمة على الاقل