问题:汉字总共有多少个?能否用VBA输出一个完整的汉字列表?
回答:“常用字有7000个左右,共有汉字90000多个。”Unicode中汉字的范围为:U4E00~U9FCC,共计2万多个。
编号 |
Unicode |
Unicode编码 |
汉字 |
拼音 |
1 |
19968 |
U4E00 |
一 |
yi |
2 |
19969 |
U4E01 |
丁 |
ding |
3 |
19970 |
U4E02 |
丂 |
|
4 |
19971 |
U4E03 |
七 |
qi |
5 |
19972 |
U4E04 |
丄 |
|
6 |
19973 |
U4E05 |
丅 |
|
7 |
19974 |
U4E06 |
丆 |
|
8 |
19975 |
U4E07 |
万 |
wan |
9 |
19976 |
U4E08 |
丈 |
zhang |
10 |
19977 |
U4E09 |
三 |
san |
11 |
19978 |
U4E0A |
上 |
shang |
12 |
19979 |
U4E0B |
下 |
xia |
13 |
19980 |
U4E0C |
丌 |
|
14 |
19981 |
U4E0D |
不 |
bu |
15 |
19982 |
U4E0E |
与 |
yu |
16 |
19983 |
U4E0F |
丏 |
|
17 |
19984 |
U4E10 |
丐 |
|
18 |
19985 |
U4E11 |
丑 |
chou |
19 |
19986 |
U4E12 |
丒 |
|
20 |
19987 |
U4E13 |
专 |
zhuan |
21 |
19988 |
U4E14 |
且 |
qie |
22 |
19989 |
U4E15 |
丕 |
|
23 |
19990 |
U4E16 |
世 |
shi |
经过一番努力(查资料+调试代码),总算得到了一个比较满意的结果。输出效果如上表所示。
代码:
Sub Unicode2HZ() '将指定范围内的Unicode编码转换为汉字,可用于输出所有汉字(共计两万以上)’ '作者:hpd, 2018年6月12日 Dim uc As Long '要转换成汉字的Unicode编码 Dim hz As String 'Unicode对应的汉字 Dim lStart As Long '要转换成汉子的Unicode编码的起始值 Dim lEnd As Long '要转换成汉子的Unicode编码的终止值 Dim arrHZ(1 To 25000, 1 To 5) As Variant '用于存放转换结果的数组变量(相比逐单元格赋值的方法,性能将得到极大(数十倍)的提高) Dim rngHZ As Range '转换结束后,将暂存在数组中转换结果写入此单元格区域 lStart = 19968 'Unicode U4E00对应的十进制数值,对应汉字“一” lEnd = 40908 'Unicode U9FCC对应的十进制数值 For i = 1 To lEnd - lStart + 1 '循环转换指定范围内的所有Unicode编码 hz = ChrW(lStart + i - 1) 'ChrW函数实现Unicode编码转换为汉字 arrHZ(i, 1) = i '转换结果的行号 arrHZ(i, 2) = lStart + i - 1 'Unicode编码对应的十进制数值 arrHZ(i, 3) = "U" & Hex(lStart + i - 1) 'Unicode编码 arrHZ(i, 4) = hz '第四列存放转换后的汉字 arrHZ(i, 5) = pinyin(hz) '调用第三方函数实现汉字拼音的查询(部分汉字不能识别,该函数有待完善) Debug.Print hz '用于在立即窗口中监控程序运行 Next Set rngHZ = ThisWorkbook.Sheets("ChineseChar").Range("A2:E" & i + 1) '指定将转换结果的写入位置:A列到E列 rngHZ.Value = arrHZ '将转换结果写入指定区域 End Sub
其中,汉字查拼音的函数摘自网络,只能识别3000多个汉字,现转发一下,方便大家调试。
以下代码摘自网络:
--------------------------------------------------------------------------------------------------------------------------------
Public Function Chinese2Spell(sChinese As String, Optional iflag As Integer = 0) As String '摘自:http://www.csdn.com.cn Dim C2S As String Set d = CreateObject("Scripting.Dictionary") d.Add "a", -20319 d.Add "ai", -20317 d.Add "an", -20304 d.Add "ang", -20295 d.Add "ao", -20292 d.Add "ba", -20283 d.Add "bai", -20265 d.Add "ban", -20257 d.Add "bang", -20242 d.Add "bao", -20230 d.Add "bei", -20051 d.Add "ben", -20036 d.Add "beng", -20032 d.Add "bi", -20026 d.Add "bian", -20002 d.Add "biao", -19990 d.Add "bie", -19986 d.Add "bin", -19982 d.Add "bing", -19976 d.Add "bo", -19805 d.Add "bu", -19784 d.Add "ca", -19775 d.Add "cai", -19774 d.Add "can", -19763 d.Add "cang", -19756 d.Add "cao", -19751 d.Add "ce", -19746 d.Add "ceng", -19741 d.Add "cha", -19739 d.Add "chai", -19728 d.Add "chan", -19725 d.Add "chang", -19715 d.Add "chao", -19540 d.Add "che", -19531 d.Add "chen", -19525 d.Add "cheng", -19515 d.Add "chi", -19500 d.Add "chong", -19484 d.Add "chou", -19479 d.Add "chu", -19467 d.Add "chuai", -19289 d.Add "chuan", -19288 d.Add "chuang", -19281 d.Add "chui", -19275 d.Add "chun", -19270 d.Add "chuo", -19263 d.Add "ci", -19261 d.Add "cong", -19249 d.Add "cou", -19243 d.Add "cu", -19242 d.Add "cuan", -19238 d.Add "cui", -19235 d.Add "cun", -19227 d.Add "cuo", -19224 d.Add "da", -19218 d.Add "dai", -19212 d.Add "dan", -19038 d.Add "dang", -19023 d.Add "dao", -19018 d.Add "de", -19006 d.Add "deng", -19003 d.Add "di", -18996 d.Add "dian", -18977 d.Add "diao", -18961 d.Add "die", -18952 d.Add "ding", -18783 d.Add "diu", -18774 d.Add "dong", -18773 d.Add "dou", -18763 d.Add "du", -18756 d.Add "duan", -18741 d.Add "dui", -18735 d.Add "dun", -18731 d.Add "duo", -18722 d.Add "e", -18710 d.Add "en", -18697 d.Add "er", -18696 d.Add "fa", -18526 d.Add "fan", -18518 d.Add "fang", -18501 d.Add "fei", -18490 d.Add "fen", -18478 d.Add "feng", -18463 d.Add "fo", -18448 d.Add "fou", -18447 d.Add "fu", -18446 d.Add "ga", -18239 d.Add "gai", -18237 d.Add "gan", -18231 d.Add "gang", -18220 d.Add "gao", -18211 d.Add "ge", -18201 d.Add "gei", -18184 d.Add "gen", -18183 d.Add "geng", -18181 d.Add "gong", -18012 d.Add "gou", -17997 d.Add "gu", -17988 d.Add "gua", -17970 d.Add "guai", -17964 d.Add "guan", -17961 d.Add "guang", -17950 d.Add "gui", -17947 d.Add "gun", -17931 d.Add "guo", -17928 d.Add "ha", -17922 d.Add "hai", -17759 d.Add "han", -17752 d.Add "hang", -17733 d.Add "hao", -17730 d.Add "he", -17721 d.Add "hei", -17703 d.Add "hen", -17701 d.Add "heng", -17697 d.Add "hong", -17692 d.Add "hou", -17683 d.Add "hu", -17676 d.Add "hua", -17496 d.Add "huai", -17487 d.Add "huan", -17482 d.Add "huang", -17468 d.Add "hui", -17454 d.Add "hun", -17433 d.Add "huo", -17427 d.Add "ji", -17417 d.Add "jia", -17202 d.Add "jian", -17185 d.Add "jiang", -16983 d.Add "jiao", -16970 d.Add "jie", -16942 d.Add "jin", -16915 d.Add "jing", -16733 d.Add "jiong", -16708 d.Add "jiu", -16706 d.Add "ju", -16689 d.Add "juan", -16664 d.Add "jue", -16657 d.Add "jun", -16647 d.Add "ka", -16474 d.Add "kai", -16470 d.Add "kan", -16465 d.Add "kang", -16459 d.Add "kao", -16452 d.Add "ke", -16448 d.Add "ken", -16433 d.Add "keng", -16429 d.Add "kong", -16427 d.Add "kou", -16423 d.Add "ku", -16419 d.Add "kua", -16412 d.Add "kuai", -16407 d.Add "kuan", -16403 d.Add "kuang", -16401 d.Add "kui", -16393 d.Add "kun", -16220 d.Add "kuo", -16216 d.Add "la", -16212 d.Add "lai", -16205 d.Add "lan", -16202 d.Add "lang", -16187 d.Add "lao", -16180 d.Add "le", -16171 d.Add "lei", -16169 d.Add "leng", -16158 d.Add "li", -16155 d.Add "lia", -15959 d.Add "lian", -15958 d.Add "liang", -15944 d.Add "liao", -15933 d.Add "lie", -15920 d.Add "lin", -15915 d.Add "ling", -15903 d.Add "liu", -15889 d.Add "long", -15878 d.Add "lou", -15707 d.Add "lu", -15701 d.Add "lv", -15681 d.Add "luan", -15667 d.Add "lue", -15661 d.Add "lun", -15659 d.Add "luo", -15652 d.Add "ma", -15640 d.Add "mai", -15631 d.Add "man", -15625 d.Add "mang", -15454 d.Add "mao", -15448 d.Add "me", -15436 d.Add "mei", -15435 d.Add "men", -15419 d.Add "meng", -15416 d.Add "mi", -15408 d.Add "mian", -15394 d.Add "miao", -15385 d.Add "mie", -15377 d.Add "min", -15375 d.Add "ming", -15369 d.Add "miu", -15363 d.Add "mo", -15362 d.Add "mou", -15183 d.Add "mu", -15180 d.Add "na", -15165 d.Add "nai", -15158 d.Add "nan", -15153 d.Add "nang", -15150 d.Add "nao", -15149 d.Add "ne", -15144 d.Add "nei", -15143 d.Add "nen", -15141 d.Add "neng", -15140 d.Add "ni", -15139 d.Add "nian", -15128 d.Add "niang", -15121 d.Add "niao", -15119 d.Add "nie", -15117 d.Add "nin", -15110 d.Add "ning", -15109 d.Add "niu", -14941 d.Add "nong", -14937 d.Add "nu", -14933 d.Add "nv", -14930 d.Add "nuan", -14929 d.Add "nue", -14928 d.Add "nuo", -14926 d.Add "o", -14922 d.Add "ou", -14921 d.Add "pa", -14914 d.Add "pai", -14908 d.Add "pan", -14902 d.Add "pang", -14894 d.Add "pao", -14889 d.Add "pei", -14882 d.Add "pen", -14873 d.Add "peng", -14871 d.Add "pi", -14857 d.Add "pian", -14678 d.Add "piao", -14674 d.Add "pie", -14670 d.Add "pin", -14668 d.Add "ping", -14663 d.Add "po", -14654 d.Add "pu", -14645 d.Add "qi", -14630 d.Add "qia", -14594 d.Add "qian", -14429 d.Add "qiang", -14407 d.Add "qiao", -14399 d.Add "qie", -14384 d.Add "qin", -14379 d.Add "qing", -14368 d.Add "qiong", -14355 d.Add "qiu", -14353 d.Add "qu", -14345 d.Add "quan", -14170 d.Add "que", -14159 d.Add "qun", -14151 d.Add "ran", -14149 d.Add "rang", -14145 d.Add "rao", -14140 d.Add "re", -14137 d.Add "ren", -14135 d.Add "reng", -14125 d.Add "ri", -14123 d.Add "rong", -14122 d.Add "rou", -14112 d.Add "ru", -14109 d.Add "ruan", -14099 d.Add "rui", -14097 d.Add "run", -14094 d.Add "ruo", -14092 d.Add "sa", -14090 d.Add "sai", -14087 d.Add "san", -14083 d.Add "sang", -13917 d.Add "sao", -13914 d.Add "se", -13910 d.Add "sen", -13907 d.Add "seng", -13906 d.Add "sha", -13905 d.Add "shai", -13896 d.Add "shan", -13894 d.Add "shang", -13878 d.Add "shao", -13870 d.Add "she", -13859 d.Add "shen", -13847 d.Add "sheng", -13831 d.Add "shi", -13658 d.Add "shou", -13611 d.Add "shu", -13601 d.Add "shua", -13406 d.Add "shuai", -13404 d.Add "shuan", -13400 d.Add "shuang", -13398 d.Add "shui", -13395 d.Add "shun", -13391 d.Add "shuo", -13387 d.Add "si", -13383 d.Add "song", -13367 d.Add "sou", -13359 d.Add "su", -13356 d.Add "suan", -13343 d.Add "sui", -13340 d.Add "sun", -13329 d.Add "suo", -13326 d.Add "ta", -13318 d.Add "tai", -13147 d.Add "tan", -13138 d.Add "tang", -13120 d.Add "tao", -13107 d.Add "te", -13096 d.Add "teng", -13095 d.Add "ti", -13091 d.Add "tian", -13076 d.Add "tiao", -13068 d.Add "tie", -13063 d.Add "ting", -13060 d.Add "tong", -12888 d.Add "tou", -12875 d.Add "tu", -12871 d.Add "tuan", -12860 d.Add "tui", -12858 d.Add "tun", -12852 d.Add "tuo", -12849 d.Add "wa", -12838 d.Add "wai", -12831 d.Add "wan", -12829 d.Add "wang", -12812 d.Add "wei", -12802 d.Add "wen", -12607 d.Add "weng", -12597 d.Add "wo", -12594 d.Add "wu", -12585 d.Add "xi", -12556 d.Add "xia", -12359 d.Add "xian", -12346 d.Add "xiang", -12320 d.Add "xiao", -12300 d.Add "xie", -12120 d.Add "xin", -12099 d.Add "xing", -12089 d.Add "xiong", -12074 d.Add "xiu", -12067 d.Add "xu", -12058 d.Add "xuan", -12039 d.Add "xue", -11867 d.Add "xun", -11861 d.Add "ya", -11847 d.Add "yan", -11831 d.Add "yang", -11798 d.Add "yao", -11781 d.Add "ye", -11604 d.Add "yi", -11589 d.Add "yin", -11536 d.Add "ying", -11358 d.Add "yo", -11340 d.Add "yong", -11339 d.Add "you", -11324 d.Add "yu", -11303 d.Add "yuan", -11097 d.Add "yue", -11077 d.Add "yun", -11067 d.Add "za", -11055 d.Add "zai", -11052 d.Add "zan", -11045 d.Add "zang", -11041 d.Add "zao", -11038 d.Add "ze", -11024 d.Add "zei", -11020 d.Add "zen", -11019 d.Add "zeng", -11018 d.Add "zha", -11014 d.Add "zhai", -10838 d.Add "zhan", -10832 d.Add "zhang", -10815 d.Add "zhao", -10800 d.Add "zhe", -10790 d.Add "zhen", -10780 d.Add "zheng", -10764 d.Add "zhi", -10587 d.Add "zhong", -10544 d.Add "zhou", -10533 d.Add "zhu", -10519 d.Add "zhua", -10331 d.Add "zhuai", -10329 d.Add "zhuan", -10328 d.Add "zhuang", -10322 d.Add "zhui", -10315 d.Add "zhun", -10309 d.Add "zhuo", -10307 d.Add "zi", -10296 d.Add "zong", -10281 d.Add "zou", -10274 d.Add "zu", -10270 d.Add "zuan", -10262 d.Add "zui", -10260 d.Add "zun", -10256 d.Add "zuo", -10254 Num = Asc(sChinese) a = d.items b = d.keys Application.Volatile For l = 1 To Len(sChinese) Num = Asc(Mid(sChinese, l, 1)) For i = d.Count To 2 Step -1 If a(i - 1) <= Num Then Exit For Next Select Case iflag Case 0 '返回拼音(首字大写) C2S = C2S & Application.WorksheetFunction.Proper(b(i - 1)) Case 1 '返回小写拼音 C2S = C2S & b(i - 1) Case 2 '返回大写拼音 C2S = C2S & UCase$(b(i - 1)) Case 3 '返回小写拼音首字 C2S = C2S & Left$(b(i - 1), 1) Case 4 '返回大写拼音首字 C2S = C2S & UCase$(Left$(b(i - 1), 1)) End Select If Len(sChinese) > 1 And iflag < 3 Then C2S = C2S & " " Next Chinese2Spell = C2S Set d = Nothing End Function Function pinyin(p As String) As String i = Asc(p) Select Case i Case -20319 To -20318: pinyin = "a" Case -20317 To -20305: pinyin = "ai" Case -20304 To -20296: pinyin = "an" Case -20295 To -20293: pinyin = "ang" Case -20292 To -20284: pinyin = "ao" Case -20283 To -20266: pinyin = "ba" Case -20265 To -20258: pinyin = "bai" Case -20257 To -20243: pinyin = "ban" Case -20242 To -20231: pinyin = "bang" Case -20230 To -20226, -20063 To -20052: pinyin = "bao" Case -20051 To -20037: pinyin = "bei" Case -20036 To -20033: pinyin = "ben" Case -20032 To -20027: pinyin = "beng" Case -20026 To -20003: pinyin = "bi" Case -20002 To -19991: pinyin = "bian" Case -19990 To -19987: pinyin = "biao" Case -19986 To -19983: pinyin = "bie" Case -19982 To -19977: pinyin = "bin" Case -19976 To -19970, -19807, -19806: pinyin = "bing" Case -19805 To -19787: pinyin = "bo" Case -19786 To -19776: pinyin = "bu" Case -19775: pinyin = "ca" Case -19774 To -19764: pinyin = "cai" Case -19763 To -19757: pinyin = "can" Case -19756 To -19752: pinyin = "cang" Case -19751 To -19747: pinyin = "cao" Case -19746 To -19742: pinyin = "ce" Case -19741 To -19740: pinyin = "ceng" Case -19739 To -19729: pinyin = "cha" Case -19728 To -19726: pinyin = "chai" Case -19725 To -19716: pinyin = "chan" Case -19715, -19714, -19551 To -19541: pinyin = "chang" Case -19540 To -19532: pinyin = "chao" Case -19531 To -19526: pinyin = "che" Case -19525 To -19516: pinyin = "chen" Case -19515 To -19501: pinyin = "cheng" Case -19500 To -19485: pinyin = "chi" Case -19484 To -19480: pinyin = "chong" Case -19479 To -19468: pinyin = "chou" Case -19467 To -19458, -19295 To -19290: pinyin = "chu" Case -19289: pinyin = "chuai" Case -19288 To -19282: pinyin = "chuan" Case -19281 To -19276: pinyin = "chuang" Case -19275 To -19271: pinyin = "chui" Case -19270 To -19264: pinyin = "chun" Case -19263, -19262: pinyin = "chuo" Case -19261 To -19250: pinyin = "ci" Case -19249 To -19244: pinyin = "cong" Case -19243: pinyin = "cou" Case -19242 To -19239: pinyin = "cu" Case -19238 To -19236: pinyin = "cuan" Case -19235 To -19228: pinyin = "cui" Case -19227 To -19225: pinyin = "cun" Case -19224 To -19219: pinyin = "cuo" Case -19218 To -19213: pinyin = "da" Case -19212 To -19202, -19039: pinyin = "dai" Case -19038 To -19024: pinyin = "dan" Case -19023 To -19019: pinyin = "dang" Case -19018 To -19007: pinyin = "dao" Case -19006 To -19004: pinyin = "de" Case -19003 To -18997: pinyin = "deng" Case -18996 To -18978: pinyin = "di" Case -18977 To -18962: pinyin = "dian" Case -18961 To -18953: pinyin = "diao" Case -18952 To -18946: pinyin = "die" Case -18783 To -18775: pinyin = "ding" Case -18774: pinyin = "diu" Case -18773 To -18764: pinyin = "dong" Case -18763 To -18756: pinyin = "dou" Case -18755 To -18742: pinyin = "du" Case -18741 To -18736: pinyin = "duan" Case -18735 To -18732: pinyin = "dui" Case -18731 To -18723: pinyin = "dun" Case -18722 To -18711: pinyin = "duo" Case -18710 To -18698: pinyin = "e" Case -18697: pinyin = "en" Case -18696 To -18690, -18527: pinyin = "er" Case -18526 To -18519: pinyin = "fa" Case -18518 To -18502: pinyin = "fan" Case -18501 To -18491: pinyin = "fang" Case -18490 To -18479: pinyin = "fei" Case -18478 To -18464: pinyin = "fen" Case -18463 To -18449: pinyin = "feng" Case -18448 To -18448: pinyin = "fo" Case -18447: pinyin = "fou" Case -18446 To -18434, -18271 To -18240: pinyin = "fu" Case -18239 To -18238: pinyin = "ga" Case -18237 To -18232: pinyin = "gai" Case -18231 To -18221: pinyin = "gan" Case -18220 To -18212: pinyin = "gang" Case -18211 To -18202: pinyin = "gao" Case -18201 To -18185: pinyin = "ge" Case -18184: pinyin = "gei" Case -18183 To -18182: pinyin = "gen" Case -18181 To -18178, -18015 To -18013: pinyin = "geng" Case -18012 To -17998: pinyin = "gong" Case -17997 To -17989: pinyin = "gou" Case -17988 To -17971: pinyin = "gu" Case -17970 To -17965: pinyin = "gua" Case -17964 To -17962: pinyin = "guai" Case -17961 To -17951: pinyin = "guan" Case -17950 To -17948: pinyin = "guang" Case -17947 To -17932: pinyin = "gui" Case -17931 To -17929: pinyin = "gun" Case -17928 To -17923: pinyin = "guo" Case -17922: pinyin = "ha" Case -17759 To -17753: pinyin = "hai" Case -17752 To -17734: pinyin = "han" Case -17733 To -17731: pinyin = "hang" Case -17730 To -17722: pinyin = "hao" Case -17721 To -17704: pinyin = "he" Case -17703 To -17702: pinyin = "hei" Case -17701 To -17698: pinyin = "hen" Case -17697 To -17693: pinyin = "heng" Case -17692 To -17684: pinyin = "hong" Case -17683 To -17677: pinyin = "hou" Case -17676 To -17666, -17503 To -17497: pinyin = "hu" Case -17496 To -17488: pinyin = "hua" Case -17487 To -17483: pinyin = "huai" Case -17482 To -17469: pinyin = "huan" Case -17468 To -17455: pinyin = "huang" Case -17454 To -17434: pinyin = "hui" Case -17433 To -17428: pinyin = "hun" Case -17427 To -17418: pinyin = "huo" Case -17417 To -17410, -17247 To -17203: pinyin = "ji" Case -17202 To -17186: pinyin = "jia" Case -17185 To -17162, -17160 To -17154, -16991 To -16984: pinyin = "jian" Case -16983 To -16971: pinyin = "jiang" Case -16970 To -16943: pinyin = "jiao" Case -16942 To -16916: pinyin = "jie" Case -16915 To -16898, -16735, -16734: pinyin = "jin" Case -16733 To -16709: pinyin = "jing" Case -16708, -16707: pinyin = "jiong" Case -16706 To -16690: pinyin = "jiu" Case -16689 To -16665: pinyin = "ju" Case -16664 To -16658: pinyin = "juan" Case -16657 To -16648: pinyin = "jue" Case -16647 To -16642, -16479 To -16475: pinyin = "jun" Case -16474 To -16471: pinyin = "ka" Case -16470 To -16466: pinyin = "kai" Case -17161, -16465 To -16460: pinyin = "kan" Case -16459 To -16453: pinyin = "kang" Case -16452 To -16449: pinyin = "kao" Case -16448 To -16434: pinyin = "ke" Case -16433 To -16430: pinyin = "ken" Case -16429, -16428: pinyin = "keng" Case -16427 To -16424: pinyin = "kong" Case -16423 To -16420: pinyin = "kou" Case -16419 To -16413: pinyin = "ku" Case -16412 To -16408: pinyin = "kua" Case -16407 To -16404: pinyin = "kuai" Case -16403, -16402: pinyin = "kuan" Case -16401 To -16394: pinyin = "kuang" Case -16393 To -16386, -16223 To -16221: pinyin = "kui" Case -16220 To -16217: pinyin = "kun" Case -16216 To -16213: pinyin = "kuo" Case -16212 To -16206: pinyin = "la" Case -16205 To -16203: pinyin = "lai" Case -16202 To -16188: pinyin = "lan" Case -16187 To -16181: pinyin = "lang" Case -16180 To -16172: pinyin = "lao" Case -16171, -16170: pinyin = "le" Case -16169 To -16159: pinyin = "lei" Case -16158 To -16156: pinyin = "leng" Case -16155 To -16130, -15967 To -15960: pinyin = "li" Case -15959: pinyin = "lia" Case -15958 To -15945: pinyin = "lian" Case -15944 To -15934: pinyin = "liang" Case -15933 To -15921: pinyin = "liao" Case -15920 To -15916: pinyin = "lie" Case -15915 To -15904: pinyin = "lin" Case -15903 To -15890: pinyin = "ling" Case -15889 To -15879: pinyin = "liu" Case -15878 To -15874, -15711 To -15708: pinyin = "long" Case -15707 To -15702: pinyin = "lou" Case -15701 To -15682: pinyin = "lu" Case -15681 To -15668: pinyin = "lv" Case -15667 To -15662: pinyin = "luan" Case -15661, -15660: pinyin = "lue" Case -15659 To -15653: pinyin = "lun" Case -15652 To -15641: pinyin = "luo" Case -15640 To -15632: pinyin = "ma" Case -15631 To -15626: pinyin = "mai" Case -15625 To -15618, -15455: pinyin = "man" Case -15454 To -15449: pinyin = "mang" Case -15448 To -15437: pinyin = "mao" Case -15436: pinyin = "me" Case -15435 To -15420: pinyin = "mei" Case -15419 To -15417: pinyin = "men" Case -15416 To -15409: pinyin = "meng" Case -15408 To -15395: pinyin = "mi" Case -15394 To -15386: pinyin = "mian" Case -15385 To -15378: pinyin = "miao" Case -15377 To -15376: pinyin = "mie" Case -15375 To -15370: pinyin = "min" Case -15369 To -15364: pinyin = "ming" Case -15363: pinyin = "miu" Case -15362, -15199 To -15184: pinyin = "mo" Case -15183 To -15181: pinyin = "mou" Case -15180 To -15166: pinyin = "mu" Case -15165 To -15159: pinyin = "na" Case -15158 To -15154: pinyin = "nai" Case -15153 To -15151: pinyin = "nan" Case -15150: pinyin = "nang" Case -15149 To -15145: pinyin = "nao" Case -15144: pinyin = "ne" Case -15143, -15142: pinyin = "nei" Case -15141: pinyin = "nen" Case -15140: pinyin = "neng" Case -15139 To -15129: pinyin = "ni" Case -15128 To -15122: pinyin = "nian" Case -15121, -15120: pinyin = "niang" Case -15119, -15118: pinyin = "niao" Case -15117 To -15111: pinyin = "nie" Case -15110: pinyin = "nin" Case -15109 To -15106, -14943, -14942: pinyin = "ning" Case -14941 To -14938: pinyin = "niu" Case -14937 To -14934: pinyin = "nong" Case -14933 To -14931: pinyin = "nu" Case -14930: pinyin = "nv" Case -14929: pinyin = "nuan" Case -14928, -14927: pinyin = "nue" Case -14926 To -14923: pinyin = "nuo" Case -14922: pinyin = "o" Case -14921 To -14915: pinyin = "ou" Case -14914 To -14909: pinyin = "pa" Case -14908 To -14903: pinyin = "pai" Case -14902 To -14895: pinyin = "pan" Case -14894 To -14890: pinyin = "pang" Case -14889 To -14883: pinyin = "pao" Case -14882 To -14874: pinyin = "pei" Case -14873, -14872: pinyin = "pen" Case -14871 To -14858: pinyin = "peng" Case -14857 To -14850, -14687 To -14679: pinyin = "pi" Case -14678 To -14675: pinyin = "pian" Case -14674 To -14671: pinyin = "piao" Case -14670, -14669: pinyin = "pie" Case -14668 To -14664: pinyin = "pin" Case -14663 To -14655: pinyin = "ping" Case -14654 To -14647: pinyin = "po" Case -14646: pinyin = "pou" Case -14645 To -14631: pinyin = "pu" Case -14630 To -14595, -6151: pinyin = "qi" Case -14594, -14431, -14430: pinyin = "qia" Case -14429 To -14408: pinyin = "qian" Case -14407 To -14400: pinyin = "qiang" Case -14399 To -14385: pinyin = "qiao" Case -14384 To -14380: pinyin = "qie" Case -14379 To -14369: pinyin = "qin" Case -14368 To -14356: pinyin = "qing" Case -14355, -14354: pinyin = "qiong" Case -14353 To -14346: pinyin = "qiu" Case -14345 To -14338, -14175 To -14171: pinyin = "qu" Case -14170 To -14160: pinyin = "quan" Case -14159 To -14152: pinyin = "que" Case -14151, -14150: pinyin = "qun" Case -14149 To -14146: pinyin = "ran" Case -14145 To -14141: pinyin = "rang" Case -14140 To -14138: pinyin = "rao" Case -14137, -14136: pinyin = "re" Case -14135 To -14126: pinyin = "ren" Case -14125, -14124: pinyin = "reng" Case -14123: pinyin = "ri" Case -14122 To -14113: pinyin = "rong" Case -14112 To -14110: pinyin = "rou" Case -14109 To -14100: pinyin = "ru" Case -14099, -14098: pinyin = "ruan" Case -14097 To -14095: pinyin = "rui" Case -14094, -14093: pinyin = "run" Case -14092, -14091: pinyin = "ruo" Case -14090 To -14088: pinyin = "sa" Case -14087 To -14084: pinyin = "sai" Case -14083, -14082, -13919, -13918: pinyin = "san" Case -13917 To -13915: pinyin = "sang" Case -13914 To -13911: pinyin = "sao" Case -13910 To -13908: pinyin = "se" Case -13907: pinyin = "sen" Case -13906: pinyin = "seng" Case -13905 To -13897: pinyin = "sha" Case -13896, -13895: pinyin = "shai" Case -13894 To -13879: pinyin = "shan" Case -13878 To -13871: pinyin = "shang" Case -13870 To -13860: pinyin = "shao" Case -13859 To -13848: pinyin = "she" Case -13847 To -13832: pinyin = "shen" Case -13831 To -13826, -13663 To -13659: pinyin = "sheng" Case -13658 To -13612: pinyin = "shi" Case -13611 To -13602: pinyin = "shou" Case -13601 To -13570, -13407: pinyin = "shu" Case -13406, -13405: pinyin = "shua" Case -13404 To -13401: pinyin = "shuai" Case -13400, -13399: pinyin = "shuan" Case -13398 To -13396: pinyin = "shuang" Case -13395 To -13392: pinyin = "shui" Case -13391 To -13388: pinyin = "shun" Case -13387 To -13384: pinyin = "shuo" Case -13383 To -13368: pinyin = "si" Case -13367 To -13360: pinyin = "song" Case -13359 To -13356: pinyin = "sou" Case -13355 To -13344: pinyin = "su" Case -13343 To -13341: pinyin = "suan" Case -13340 To -13330: pinyin = "sui" Case -13329 To -13327: pinyin = "sun" Case -13326 To -13319: pinyin = "suo" Case -13318 To -13314, -13151 To -13148: pinyin = "ta" Case -13147 To -13139: pinyin = "tai" Case -13138 To -13121: pinyin = "tan" Case -13120 To -13108: pinyin = "tang" Case -13107 To -13097: pinyin = "tao" Case -13096: pinyin = "te" Case -13095 To -13092: pinyin = "teng" Case -13091 To -13077: pinyin = "ti" Case -13076 To -13069: pinyin = "tian" Case -13068 To -13064: pinyin = "tiao" Case -13063 To -13061: pinyin = "tie" Case -13060 To -13058, -12895 To -12889: pinyin = "ting" Case -12888 To -12876: pinyin = "tong" Case -12875 To -12872: pinyin = "tou" Case -12871 To -12861: pinyin = "tu" Case -12860, -12859: pinyin = "tuan" Case -12858 To -12853: pinyin = "tui" Case -12852 To -12850: pinyin = "tun" Case -12849 To -12839: pinyin = "tuo" Case -12838 To -12832: pinyin = "wa" Case -12831, -12830: pinyin = "wai" Case -12829 To -12813: pinyin = "wan" Case -12812 To -12803: pinyin = "wang" Case -12802, -12639 To -12608: pinyin = "wei" Case -12607 To -12598: pinyin = "wen" Case -12597 To -12595: pinyin = "weng" Case -12594 To -12586: pinyin = "wo" Case -12585 To -12557: pinyin = "wu" Case -12556 To -12546, -12383 To -12360: pinyin = "xi" Case -12359 To -12347: pinyin = "xia" Case -12346 To -12321: pinyin = "xian" Case -12320 To -12301: pinyin = "xiang" Case -12300 To -12290, -12127 To -12121: pinyin = "xiao" Case -12120 To -12100: pinyin = "xie" Case -12099 To -12090: pinyin = "xin" Case -12089 To -12075: pinyin = "xing" Case -12074 To -12068: pinyin = "xiong" Case -12067 To -12059: pinyin = "xiu" Case -12058 To -12040: pinyin = "xu" Case -12039 To -12034, -11871 To -11868: pinyin = "xuan" Case -11867 To -11862: pinyin = "xue" Case -11861 To -11848: pinyin = "xun" Case -11847 To -11832: pinyin = "ya" Case -11831 To -11799: pinyin = "yan" Case -11798 To -11782: pinyin = "yang" Case -11781 To -11778, -11615 To -11605: pinyin = "yao" Case -11604 To -11590: pinyin = "ye" Case -11589 To -11537, -8504: pinyin = "yi" Case -11536 To -11522, -11359: pinyin = "yin" Case -11358 To -11341: pinyin = "ying" Case -11340: pinyin = "yo" Case -11339 To -11325: pinyin = "yong" Case -11324 To -11305: pinyin = "you" Case -11304 To -11266, -11103 To -11098, -5980, -4390: pinyin = "yu" Case -11097 To -11078: pinyin = "yuan" Case -11077 To -11068: pinyin = "yue" Case -11067 To -11056: pinyin = "yun" Case -11055 To -11053: pinyin = "za" Case -11052 To -11046: pinyin = "zai" Case -11045 To -11042: pinyin = "zan" Case -11041 To -11039: pinyin = "zang" Case -11038 To -11025: pinyin = "zao" Case -11024 To -11021: pinyin = "ze" Case -11020: pinyin = "zei" Case -11019: pinyin = "zen" Case -11018 To -11015: pinyin = "zeng" Case -11014 To -11010, -10847 To -10839: pinyin = "zha" Case -10838 To -10833: pinyin = "zhai" Case -10832 To -10816: pinyin = "zhan" Case -10815 To -10801: pinyin = "zhang" Case -10800 To -10791: pinyin = "zhao" Case -10790 To -10781: pinyin = "zhe" Case -10780 To -10765, -10591: pinyin = "zhen" Case -10764 To -10754, -10590 To -10588: pinyin = "zheng" Case -10587 To -10545: pinyin = "zhi" Case -10544 To -10534: pinyin = "zhong" Case -10533 To -10520: pinyin = "zhou" Case -10519 To -10498, -10335 To -10332: pinyin = "zhu" Case -10331, -10330: pinyin = "zhua" Case -10329: pinyin = "zhuai" Case -10328 To -10323: pinyin = "zhuan" Case -10322 To -10316: pinyin = "zhuang" Case -10315 To -10310: pinyin = "zhui" Case -10309, -10308: pinyin = "zhun" Case -10307 To -10297: pinyin = "zhuo" Case -10296 To -10282: pinyin = "zi" Case -10281 To -10275: pinyin = "zong" Case -10274 To -10271: pinyin = "zou" Case -10270 To -10263: pinyin = "zu" Case -10262, -10261: pinyin = "zuan" Case -10260 To -10257: pinyin = "zui" Case -10256, -10255: pinyin = "zun" Case -10254 To -10247: pinyin = "zuo" Case Else: pinyin = "" End Select End Function
------------------------------------------------------------------------------------------------------------------------------