<٪
'取字段数据每个汉字的拼音首字母
FunctionGetPychar (char)
TMP = 65536+ASC (char)
if (tmp> = 45217andtmp <= 45252) ثم
getPychar = "a"
elseif (tmp> = 45253andtmp <= 45760) ثم
getPychar = "B"
elseif (tmp> = 47761andtmp <= 46317) ثم
getPychar = "C"
elseif (tmp> = 46318andtmp <= 46825) ثم
getPychar = "D"
elseif (tmp> = 46826andtmp <= 47009) ثم
getPychar = "e"
elseif (tmp> = 47010andtmp <= 47296) ثم
getPychar = "F"
elseif (tmp> = 47297andtmp <= 47613) ثم
getPychar = "G"
elseif (tmp> = 47614andtmp <= 48118) ثم
getPychar = "H"
elseif (tmp> = 48119andtmp <= 49061) ثم
getPychar = "J"
elseif (tmp> = 49062andtmp <= 49323) ثم
getPychar = "k"
elseif (tmp> = 49324andtmp <= 49895) ثم
getPychar = "L"
elseif (tmp> = 49896andtmp <= 50370) ثم
getPychar = "M"
elseif (tmp> = 50371andtmp <= 50613) ثم
getPychar = "N"
elseif (tmp> = 50614andtmp <= 50621) ثم
getPychar = "O"
elseif (TMP> = 506222ANDTMP <= 50905) ثم
getPychar = "P"
elseif (tmp> = 50906andtmp <= 51386) ثم
getPychar = "q"
elseif (tmp> = 51387andtmp <= 51445) ثم