در کد زیر فرض بر این هست که:
Rs رکوردست شما.
Users جدول بانک.
FName فیلد مورد جستجو.
در واقع علامت ' تعیین میکند که اول عبارت مورد جستجو باید دقیقا کلمه داخل تکس باکس باشه و عبارت * در آخر کد یعنی اینکه مابقی عبارت هرچی باشه مهم نیست.
If Text1.Text = vbNullString Then Exit Sub
If Rs.State = 1 Then Rs.Close
Rs.open "Select * From Users Where FName Like '" & Text1.Text & "*'"