فيلتر كردن فرم يا ليست باكس بوسيله تكست باكس

[abbassamiezade]

سلام
آيا مي توان فرم يا ليستي از اسامي و اطلاعات انها را(مثلا ليست اطلاعات پرسنل) بوسيله چند تكست باكس كه بالاي فرم قرار مي دهيم فيلتر كرد به طوري كه با اضافه كردن هر حرف يا شماره كل اطلاعات بر حسب آن فيلتر شود و ما به اطلاعات مورد نظر خود برسيم؟يه چيزي مثل برنامه هاي ثبت ساعات كاري پرسنل كه فكر كنم با sql نوشته شده است ممنون

[abbassamiezade]

هم اكنون نيازمند ياري شما هستيم!!!:بامزه:

[bita_ziba77]

با سلام نمونه هاي زيادي در سايت وجود دارد علي ايحال از كد زير مي توانيد استفاده نماييد:

Private Sub yourtextbox_Change()
Me.Recalc
Me.yourtextbox.SetFocus
Me.Filter = "Yourfield like '*" & Nz(Me.yourtextbox, "*") & "*'"
Me.FilterOn = True
Me.yourtextbox.SelStart = Len(Nz(Me.yourtextbox, 0)) + 1
End Sub

[abbassamiezade]

سلام
از پاسخ شما متشكرم در صورت امكان يك نمونه محبت بفرمائيد:خجالت:

[abbassamiezade]

سلام حالا كه كسي جواب نميده از مديران تالار خواهش مي كنم خودشون زحمتش را بكشند

[ARData]

با سلام نمونه هاي زيادي در سايت وجود دارد علي ايحال از كد زير مي توانيد استفاده نماييد:

Private Sub yourtextbox_Change()
Me.Recalc
Me.yourtextbox.SetFocus
Me.Filter = "Yourfield like '*" & Nz(Me.yourtextbox, "*") & "*'"
Me.FilterOn = True
Me.yourtextbox.SelStart = Len(Nz(Me.yourtextbox, 0)) + 1
End Sub


دست شما درد نکنه واقعا اين بهترين جستجويي که من در تاريخ عمرم که با اکسس سازوکار دارم ديده ام شما لايق تشکر هاي بيشتري هستيد .
بر اين اساس من فايل اين نوع جستجو را درست کردم واقعا شکه شدم چون تا حالا از کيوئري براي اينکار استفاده مي کرديم ولي کيفيتش اينطوري نبود ...

[hmdrzy]

دست شما درد نکنه واقعا اين بهترين جستجويي که من در تاريخ عمرم که با اکسس سازوکار دارم ديده ام شما لايق تشکر هاي بيشتري هستيد .
بر اين اساس من فايل اين نوع جستجو را درست کردم واقعا شکه شدم چون تا حالا از کيوئري براي اينکار استفاده مي کرديم ولي کيفيتش اينطوري نبود ...
با سلام
وقتي جستجوي فارسي ميكني و به حروفي ميرسيم كه ديگه تو جدول نيست ارور ميده