try something like this.
dim strTemp as string
strTemp=combo7.value
While InStrRev(strTemp, Chr(44))
strTemp = Mid(strTemp, 1, (InStrRev(strTemp, Chr(44)) - 1)) & Mid(strTemp, (InStrRev(strTemp, Chr(44)) + 1))
Wend
Set rst2 = CurrentDb.OpenRecordset("Select * From Product_Master " & _
"where...