فوری لطفا کمک کنید

به فرض یه کمبو باکس داریم که توش نوع سرچ رو تعین میکنیم که عناصرش به شرح زیرن: برای مثال یه فروشگاه

0- شناسه خرید

1- شناسه ی مشتری

2- شناسه ی محصول

یه تکست باکسم داریم بای کلمه ی جست و جو یه دکمه هم کنارش برای جست و جو داریم.

کد دکمه ی سرچ از این قراره:

Private Sub cmdSearch_Click()
Adodc1.CommandType = adCmdText
If txtSearch.Text = "" Then
    Exit Sub
End If

If Combo1.ListIndex = 0 Then
    Adodc1.RecordSource = "select * from Buy where B_ID=" & CLng(txtSearch.Text)
    Adodc1.Refresh
    
End If

If Combo1.ListIndex = 1 Then
    Adodc1.RecordSource = "select * from Buy where C_ID like  '" & txtSearch.Text & "%' "
    'MsgBox Adodc1.RecordSource
    Adodc1.Refresh
   
End If

If Combo1.ListIndex = 2 Then
    Adodc1.RecordSource = "select * from Buy where P_ID like  '" & txtSearch.Text& "%' "
    'MsgBox Adodc1.RecordSource
    Adodc1.Refresh
   
End If
End Sub

تو این مثال موارد زیر وجود داره:

B_ID---> شناسه ی خرید

C_ID---> شناسه ی خریدار

P_ID---> شناسه ی محصول

از دستور لایک Like برای مقایسه ی دو مقدار در sql استفاه شده که مثلا آیا متن مورد جست و جو تو تکست سرچ برابر با هیچ مقاری از رکورد فلان (که براساس کمبو تعیین میشه) هست یا نه؟.

موفق باشید دوستان