vb判断字符串是否包含汉字