复制代码 代码如下:
'判断字符串中是否有中文字符
'有-返回 true
'无-返回 false
'这里的中文字符可能还包括日文、韩文等东方文字
function HasChinese(str)
HasChinese = false
dim i
for i=1 to Len(str)
if Asc(Mid(str,i,1)) < 0 then
HasChinese = true
exit for
end if
next
end function
js判断是否有中文
内容版权声明:除非注明,否则皆为本站原创文章。