En fait, la meilleure façon de juger le chinois est le js que j'ai écrit dans l'article précédent. Tant qu'il s'agit de doubles octets, il est jugé comme du chinois (VBScript est le langage). la valeur de retour de la fonction Asc est inférieure à 0, peut être jugée comme des caractères chinois. La fonction Asc renvoie le code de caractère ANSI correspondant à la première lettre d'une chaîne.
Copiez le code comme suit :
'Détermine s'il y a des caractères chinois dans la chaîne
'Oui - renvoie vrai
'Aucun - renvoie faux
"Les caractères chinois ici peuvent également inclure des caractères japonais, coréens et autres caractères orientaux.
fonction HasChinese(str)
HasChinese = faux
je suis faible
pour i=1 à Len(str)
si Asc(Mid(str,i,1)) < 0 alors
HasChinese = vrai
sortie pour
finir si
suivant
fonction de fin