VBA 如何檢測一個中文字符串是否包含在另一個字符串中

Sub test()
    aaa = "江蘇省南京市建鄴區水西門大街34號"
   If InStr(aaa, "建鄴") <> 0 Then
      MsgBox "在里面"
   Else
    MsgBox "不在里面"
End If

End Sub