انتخاب سطر لیست باکس بر اساس تکست باکس

**M_ExceL** · 2020/08/21, 02:53

نوشته اصلی توسط پیمان طهماسبی

با سلام
من سوابق را نگاه کردم سرچ در لیست باکس بود. بطوریکه همه آنها براساس متن داده های لیست باکس را فیلتر می کردند.
ولی من می خوام بر اساس متن تایپ شده و با زدن کلید جستجو داده مورد نظر در لیست باکس انتخاب ( هایلایت ) شود ( فایل نمونه پیوست آورده ام )
با تشکر

با سلام،
خدمت شما :

کد:

Private Sub CmbFind_Click()

For i = 0 To Me.LstData.ListCount - 1
    If LCase(Me.TxtFind.Text) = LCase(Me.LstData.List(i, 0)) Then
        Me.LstData.Selected(i) = True
        Exit For
    End If
Next

End Sub

انتخاب سطر لیست باکس بر اساس تکست باکس

[حل شده] انتخاب سطر لیست باکس بر اساس تکست باکس

کامنت