Like 作用于汉字查找的表示方法
For j = 1 To Len(Cells(i, 4))
If Mid(Cells(i, 4), j, 1) Like "[含肉松水果奶油芝麻]" Then k = k & Mid(Cells(i, 4), j, 1)
Next
Like 用于窗体的模糊查询表示方法
If Cells(i, 1) Like UserForm5.TextBox1 & "*" And Cells(i, 2) Like "*" & UserForm5.TextBox2 & "*" And Cells(i, 3) Like UserForm5.ComboBox1 & "*" Then