如何使用InStr函数在字符串中找到星号？

Question

Microsoft文档指定"~*"用于"*"在字符串中搜索."~*"并且"[*]"不工作.

正在搜索的字符串表达:"Balıkyağı,balıkunu,yaşmeyve,kuru meyve,sucukfastırma,nebatiyağ,sütvesütmamulleriimalatındakullanılaniktisadikıymetlerveözelraçgereçler*"

If InStr(1, WS.Cells(intRow, 6).Value, "~*", vbTextCompare) > 0 then
    'Additional code here
End If

此代码找不到星号字符.

Answer 1

摆脱~对*你不需要什么特别的.

Sub testss()

    Dim str As String

    str = "test*name"

    '/ Returns 0
    MsgBox InStr(1, str, "~*", vbTextCompare)

    '/ Returns 5
    MsgBox InStr(1, str, "*", vbTextCompare)

End Sub