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

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

End Sub