如何取汉字的第一个拼音字母(一)
如何取汉字的第一个拼音字母
#region
$PBExportHeader$f_get_first_letter_2.srf
global type f_get_first_letter_2 from function_object
end type
forward prototypes
global function string f_get_first_letter_2 (string as_string)
end prototypes
global function string f_get_first_letter_2 (string as_string);//==============================================================================
// function:wf_cvt_chinese
//------------------------------------------------------------------------------
// description:
//------------------------------------------------------------------------------
// parameter:
// string as_string
//------------------------------------------------------------------------------
// return type: string
//------------------------------------------------------------------------------
// Author: Jason Date: 2007-07-23
//------------------------------------------------------------------------------
string ls_letter, ls_rtn_string, ls_string, ls_string_hz
integer li_string_len, i
long ll_count//, QW
ls_string = trim(as_string)
li_string_len = len(ls_string)
ls_rtn_string = ""
ls_letter='ysx mcsdqlybjjjgczbdfyawj yhcywgj dsn xy sng lggllyj z yssgyqyd xjyydldwj wbbft xdhgbczsrfmjwyfcwdzpyddwylfaypdftzyjqxxzxnnxxzqbpysyzgmzbqbzcyzbxqsbhgxefmbhhgqcxstglygymxalelccxzrjsdnjjtzzcljdtstbnxtyxxgkwyflhyqspxmxxdjzlshxjbcfybyxhczbjyzlwlcz gtsmdzxpqglsjfzzlslhdzbwjncjysqycjrzcwybtyfdwecskdcbyhyzqyyxzcfbzmjyxxcdcztbzjwszsxyrnygmdthjxsjjccsbxyytsyfbxzgclczzbscyzqscjzqydxlbbjllmqxtydzsqjtzplcgqdzwjbhctdyfxyelbgxxmyjjqfzasyjncydk jcjszcbatcclyjqmwnqncllkbybzzsyhjqltwlccxthllzntylnzxddtceejys sd hwnly t jymrymcjgjmzgxykymsmjkmfxmtghpfmqjsmtgjqdgyalcmzsdjlxdffjczfmzffkgpkhrcjqcjdwjlfqdmlzbjjscgckdejcjdlzyckccclfcq czgbdldjjyhddwgsjdaccctllpskghzzljlgjgjjtjjjzczmlzyjklzyzmljkywxmkjlkjgmclykjqlblkmdxwyxysllpsjjjqxyjfjdjdmxxllcxqyjb bggypjyggdjgnjyjkhqfqzkhyghdkllsdjjxeyqxnzsxwwxdjlgxxjaqscsqkjex yzhydz p qyzmtstzfcyldjagylallyyygmqq ldhcssadsgbrlyjsjwrcgqc hmmxjdyohycqgbehwnjdogjlgwqwjycstwesjpwmrdsztxyqpzhyhykhtpbfyhtdwzbtxhqexzxxkhtexwltxymnx hykpmzhxlblbmlsfhyyggbhyjt'
ls_letter=ls_letter+'ywlqczydqdq g l s wyqeqajdytlxanzdexqtwwdgqqdyzbchyqzlxygzgl djt tadyzzcwyzymhyhyjzwcxhdnlyskqydbcywy b qgtyhqsygxmchrwjbwqzlw s s nqbalzzmtjcjtsaxljhhgoxzcpdmhgtysjxhmrlxjkxhmqxtdxwzbkhcczdytxqhlxhyxysyydd znyxjyaykypdhdd pyzndltwxydpzjjcxmtlhbynyymhzllhnmylllmdcppxmxdkycy ltachhznxzlcclylzsxzjnzln lhyntkyjpychegttgqrgtgyhhlgcwyjkyyyttttlhyllyttplkyyqqzdqxsnmjzxyqmktfbjdjjdjptjzgtsyflqgxblzfh zadpmjhlccyhdzfgydgcyxsbhdkdhaxxbfbyyaxzqbfqyjjdljjzlhbjydyjsqwjlzkcdtctbkdzzdqjnkknjgyeglfyka ntchblwzbymjnagzyheybjmctyfzjjhgjpljhdwxxjkyykssmwctqzlpbzdtwzxzagykwxlhlspbclloqmmtslbcdzkdcz jgqjdcytzqwzqcsbptdfqdzdsddtdwfhtdyzjaqqkypdjybtljhdrqxlxaydrjlklytwhllrllcxylbw zymzzhkhxksmdsyyjpzbsqlcxxnjwwdq gqmmczggbtybygbedpjldyhkzbhfdxbawpwajldyjsfhblddqjncxfjhdyjhwzpkzypcyzynxff wdbzznytxyembsehxfzmbflzrsymzjrdjgxhjgjjnzzxhgjkymlpeyyxtwqshdscxmfwkcctxnybnzhzptxwywxyysljzqxzdlaelmcpjclxsqhfwwtfftnqjjjdxhwyznflakyyjldxhhyyncjyywdrmdnqhwqcmfjdyzhmayxjwzqtxdlmrspwwchjb xygcyyrrlmpamkqzyjrmysn'
ls_letter=ls_letter+'tblnbpyyxyykyngjtznlzhhanmpgwjdzmxxmllhgdzxyhxkrycjmffyyhjfssqlqxndycannmdcjcyprneytyqymbsxndlylyljrlqysqmllyzljmxstynsmcwynzlxbnnylrktryyjzzhsytxcjgxzdphmkczyqhzjnbh qsnjntybknlqhsnswxkhjyybqcbfldpzbkjzxzddjeescmlxxkynmwwwydkzggtggxbjtdszxnx mlptfxlcxjjljsxpwxledhlrwasc ybyawjefwqqjzzyjgxpltqtpakqptlcp btxbhblefdleegqymsawhmljdwyglyjeybqfnlyxrdsctggxyyn kyqctlhjlmkkzgygllldzydhzwbjzkdyzzhyyfqytyzdezklymhjhtwyzlkyywzcskqqtdxwcdyjalwkbdqyncsrszjlkcdcdtlzzacqqzzddxyplxzbqjylzlljdzgyjyjzyxnyyynyjjkgdazwrdljyyyrjlgllyxjcykynqcclddnyyynykhjcl qzzyjsq pzdnfpzhddwbmyypqjrssqzsqdgpzjwdqjdhzxwybpdgptmjthzsbgzmbjczwbbzmqcfmbdmcjxljbgjtzgmqdybjzyctyztzxtgkmybbcljssqymscxfjwlsszbqjjlydlyctsqmcwfg kbqllljyxtyltydphnhfjyzyesesdhwdjbsjtfd czyjsyjdzjqpbsdjgfbkjbxdgjhmgwjjlhhyyyyywyycdypcbyjzwdlfwxwzzjczcdjzczlxjjtjpfwbxzbtdzbzcyhmlxbjlrdgrgytlfywwwjxjwcyqcttqhxwxkybmpkbntgjyddyfxbyxcbhxbsxtym sxlhkmzxydhwqjskqhcyxglcsqypdhxmy ybyyykzlhqtbqxmyhcwllcylnewcdcmlggqktlxkgndgzwjjlyhjdtnchxerzjydn'
ls_letter=ls_letter+'ydcqcbhztbxwgwbxhmykdydmqkaqynzsyqgysqyshjgjcnxkzycxsbkxhyylcyxtymgcpmgcccccmztasgqzjlosjylstmqsqdzljqqyplcycztcqqpbqjclpkhz yyxxdtddsjcjffllxmlwcjcxtspyxndtjsjwhqqjckyylsjhaykxcyydmamdjmlmczncybzkkyflmchclhxrcjjgslnmtjggygjddcjzkzqgjyyhzhxqhheytmdjyyylfrzzdgwgscqgw rxqjyaxqz ywbgwgyqdzywnppbazybznbyzzyhnycpjmqcy zpnqtbdjkqqhngzyxchbdgddnzgjdnlzlsjljyxytbgtcskmnjbjyljzfkjhtpzsyjwbzyzlstbwwqsmmfdwjyzttbwzwqcslqgdhqswlyzlgyhydcbtckpjmgmspnkyjynhpwcnszzxybyhyzjkjdllcjthgdxxjzbyw wzggqrhzssnbeydznlqxjme dsdjbltknwqwqtzenqzwzkrscsjccgpdqslccgllzghzqthnjgyaznmckcstjckbjygqjpldxrgzyxcnhgdnlzwjjcddbcjxbfzwpqdhjtywjynlzzbcjdsjj dxyayemmjtcljyryynhjbngzjkmjxltbsllrtylclcnxpllhyllqqqljymcycxslmmc cltldwtjllggjxkygbpdkmwhccgxjczdybxdnddykyjtxdyxmaadzsloxyjsjzylbtxxxqqjz bylwsjjyjtdyqqzzzzjlzcdzjhpy qblffjzysj zfpfzksyjjhxtdxcysmmtcwbbjshfgxfqhyzfsjybxpzlhmbxhzxfywdabalktshxkkjjzthgxh jxkzxszzhhwtzzzsnxdzyawlcwxfgyyhxmyydwqmnlycyspjkgwcqhyljmzxhmcnzhhxcltjplxyjhdyylttxfszhysxsjbjyayrmlckd y'
ls_letter=ls_letter+'hlrlllstyzyyhscszqxyqfpblf ntljmmtqyzwtlllpz rbdmlgjbzcrqwwxfzetdmcyggyjswjmxybdqc dhxncswjjmbafyfnhydxyezyzsdlsnxcxgbmyyysnbynlhpfzdcyfssssnydzdgbafbdbsszbfgcyjlmlrz yxqzyxzlskbrbrbzcycjzeeyfgzlyysfrykqsxdcyzyjlzxszbykjbbrxllfqwjgyqylpzdjtzabdhzrbjhwnjtjxlkcfsqdqyjhzcwjl bxftzlltlqblcqqccdfbbhczlyyggd wcfczqyyyjysqzflzzfcqnwlhjzjjczkybzzbpdccmhjgxdgdzq fgpsysdfwwjzhyxyyjyhwpbygxrylybhkjksftjmmkhyycyyzpyjydywmtjjrhlqxstws jyzfnmgjtyxyzmsjyjhhqmyrszwtrtzsskx gqgsptgcdnjgqqmxgztqydjzdlsdglhyqgggthszpyjhhgnygkggmdzllcclxqstgzslllmlcskbdlzzsmmytpzsqjcjyxexyzcpshkzsxcdfmwrllqjrfjlysdctmxdhjndnrtzfqyhqgllgxszsjdjjcdqjlnyhszxcgjzypfhdjsbcczgjjjzjqdyb sslyttmqtbhjqmnygkynqyqmzgcjkpdcgmyzgqllsllclmholzgdylfzsljcqzlylzqjesgnylljxgjqlyjyyyxnbzljsswcqqc yllzldjyllzllbnylgyhxcxqaykxhklksexcqkkkcgyyxyytjohthxpycx lcyeychbbjqzscszsslzylgezwmysx jqqsqyyycmdzywctjsydjkcddjlbdjjzkysqkyxhqjohdyxgmajpc pljsmtxerxjqd pjdbsmsstktslmltrzszmldjqynbsqxqydyyzbdslmfgbzmdycwfdtmypyytjjzqjjtjhfbgzpjhyxxy'
ls_letter=ls_letter+'ydyhhnmmcpbzpzzlzfmzdlmyftskygyjyhbzkagh pzdscsjxsjfjgdypyhzcwhjsexfqzywklatmlymqpxxskjjpxzgmwqyjs cjlqwhmybdhyylhlglcfytljcjncpjlkphjntxteylsslsdyhxtcznwtdwjslhtjdjggdphcqfcljlzptynlmjllqynbhylqqzybbywrfykjdsqpxyrhjnwtfwdwrchygmm yyhsmzhngcelqqmtcwcmbxjjfyysjztybmstsyjdtjqtlhynbyqhlcyzhzmylflwxypjysylymzctdwgszslmwzwwqzsayysssapxwcmghhxdzyjgsjhyglcxyxhbbzkssmalhycfygmqyjycxjlljgczgqjcctotyxmtthlwtgpzkpzzxkjyclctjzyh xsgzkxzpjjpdhjwpjgxqyxsdmrszzyzwtxkytshbcsplwssdjhjlchhylhfghxjsxalnylmdhzxysxlozyhcldyhzmdyspj qznwjpsjwctsdszlnssmnyymjqjzwtydchqlxawbgqybkfcmjwlzllyylszydwhxpcbcmljscgbhxlqrljxyswwxzlldf hlslymjljylyjcdnjlfsyzfnllcqyqfjyyszlylmstdjcyhzllnwlqxygyygxxhhzyxczqzbnwpypkpypmlgxggbdxzzkzfbxxlzptytswhzyxhqhxxxywzyswdxzkhzphgchc lfjxptzthlyxcrhxshhkjxxzjdxj lyjlkhtxcwhjfacfpqryqxyjy gpgwsgsy gwchkzdhflxjbyzwtqxxncyjjmwyjqrhfqsyljzgynslgtcebyxxwyhhyynsqymlywgyqbbzajlpcytjzhyzwlhorjkczjxxyxchcyqyxqjddsjbxyltsxlmtyjmj yyxltcxqzlhzlwyxzhd brhxjctshlbrlmrllaxksllljlyxxlycry l'
ls_letter=ls_letter+'ctgjcmtlzllyzzpcwhjyzeckzdqyqpcjcyzbbbcydcnltrmfgygbsygmdqqzmkqlpgtbqcjfkjcxbljmswldtqxldlppbxcwrcbjczggbhyyfzkzmpjyxylpnyyxdb'+space(30*56)+' kxhmzjxsttdmxxbzyshjpfxpqbyljqkyzzzyl zgfwyctygjbyysbmsmydyshqy zcgmjmcagcbbbhblytyxxsdjgjdhkxxnb'+space(93)+'hnmlngsltxmrnexqjyxlsqglbhdcgyqychwfjymbyjyjydpqyapfxcgjscrssyj lbzjjjlgxzyxyxsqyxbxxgcxpldywetdw'+space(93)+'wcjmbtxchqyxxfxlljsfwdbzcmylmwwtcbcecblgdbqzqfjdjhymcxtxdrmjwrh xcjzylqdyhlsrsywwzjymtllltqcjzbtc'+space(93)+'kzcyjjzqalmyhwwdxzxqdlljsgjfjljhjazdjgtkhsstcyjfbszlxjxrwgldlzr lzqtgslllllymxwgdzybbhl h bpfd w'+space(93)+'hy jcc dmzpbz cyqxldoclwdwyythcqsccrsslfyfpdqmblslmyfgjbtm jwfn mmjtgbdzlpyhyymjyldhdzjcctlcldljc'+space(93)+'pddjdsdnbgzxxcjqycbzxzbzfjsnttjyhtcmjxtmxspdsybzgmljdacbmdkycsz zyfyctgwhkyjxgyclndzscyzssdllqflq'+space(93)+'llxfdyhxgwnywyllsdbbbjcyjzylhljxyyytdlllb bffqbzmbclmjpgehbcqap hhhzchxyhjaxhlphjgpqqzgjjzz zdqyb'+fill('a',36)+'bbbbbbbbbbbbbp'+fill('b',34)+'pbbbbbbbbzhhbwyffq'
ls_letter=ls_letter+'dlzljxjpalxzdaglgwqytxpfmmsypfmxsyzashdzkjsmmzzsdnzcbp ltddnmxzymzmmqhhczjemxxkstgwlsqlz'+fill('b',56)+'p'+fill('b',36)+'llzjphlyzyhmxxhgzcjmhxtxfwgmwkdthmfzzydkmsclcmghsxpslcjyxwgjyah jzmcsnxyymmpmlgxmhlmlgmltkzqyszjs'+fill('b',30)+'bb'+fill('c',61)+'hyzjzybddzwdkgdjlfwekzjbezswjmjyltemznplplepykkqzgeqlwakyplhqwq kkclhyxxblyccyskg hlcnszkydkcqzqcccz'+fill('c',50)+'s'+fill('c',38)+'ljbmjhqlywqlnrydtykwsadxddntqdfqqmgxelttkpwtqqlwydl yzcqapllkcc ylpqqczcljslzjxddbsqdljxzqjyzhkzlccccccccccccccccz'+fill('c',60)+'ddddddddddddddddjcyhdyppypeakjyrpcbymxkllzllfqpylllmsglcyrytmxyqbdz ysyztfbsmcl ywzgxzggljsgkdtggzlldzbchyyzhzywx'+fill('d',51)+'z'+fill('d',41)+'yzymsdbzyjgtsmtfxqyjscdgslnmdlyzzlrxtrznzxnqfmyzjzykbpnlypblnzz jhtzkgyzzrdznbgxskgjttyllgzzbjzkl'+fill('d',73)+'eeeeeeeeeeeeeeeeeeeepbzyl yqbjfbnjzzxcdljyxzgyrsrjksmtjlsjywq yhqjxpjbtzlsnshrnypjt wbhklbsjlzyysjylybbwkpdwwcyxckdzxe'+fill('f',92)+'sgzwwyqyytctdllxwkckkkcclzcqqdzlqcsfqchqhsfmkzlnbbshjdysjqplzcd cwjkjlpcmdwjsqyzyhj'
//ls_letter=ls_letter+'bydsdzngqmbsplfffffffffffpffffffffffffffffffff'+fill('g',49)+'hgggggggggggnffgfsmxqmlgqcyybkjsrjhzldcftlljgjhyxzcszztjggky xblbbbgtdyjdhz zzlljfzgqjcczbxbsxpxhyyclwdxjjxmf'+fill('g',93)+'hfzhqqmqgsyhtycnznqxgpdhcszqljbhbdcyzcpbytzsgyhckpzjljnscdsllxb msdldfjmkdjzlxlszqpqpgjllydskgqlshhhhhhhhhhhhhhhhhhhhhhhhhhbhhhhhhhhhhhhhhhhhhhhhm'+fill('h',44)+'lkyyhjttmcyqtzzbszqztlljtyyllqllqyzjlbdzlslyyzyfszsnhnczqzbbwck rbcyzmthgjmzlshtclzbleqhxflyljqbz'+fill('h',86)+'jjjjjjjjhstbmzjlxfnbgxjztsfjmssnxlkbhsjhtnlzdntlsjgzjyjczxyhygwrwqnztn fjscpzshzjfyrdjfzjzbfzqchzxfysbzq'+fill('j',86)+'kjjjjjjlzsgyfttdcszxzjbqmszkjrhyjzcgbjkhcggtjkjqglxbxfgdrdylxjgdtsjxgj jjzwzlcqsbtxhqbxttxhxftsdkfjhzyjf'+fill('j',35)+'y'+fill('j',58)+'x zcdlllcqcqzqwqxswtwgwbzcgzllqzbclmqqtzgzxzxljfrmyzflxysqxxjk xrmjdzdmmyybsqbhgzmwfwtgmxlzbyytg'+fill('j',93)+'zwccdxyzxswg yjyznbgpzjcqswxsjrtfyzgrhztxszzthcbfclsyxzljqmzlmp lxzjxclbysmqhxjsxrxsjzzzsslyflczjjjxjjkkkg'+fill('k',84)+'rcrxhhzxqydshjsjjhqcjjbdynsysxjbqlpxqpy'
ls_letter=ls_letter+'bydsdzngqmbsplfffffffffffpffffffffffffffffffff'+fill('g',49)+'hgggggggggggnffgfsmxqmlgqcyybkjsrjhzldcftlljgjhyxzcszztjggky xblbbbgtdyjdhz zzlljfzgqjcczbxbsxpxhyyclwdxjjxmf'+fill('g',93)+'hfzhqqmqgsyhtycnznqxgpdhcszqljbhbdcyzcpbytzsgyhckpzjljnscdsllxb msdldfjmkdjzlxlszqpqpgjllydskgqlshhhhhhhhhhhhhhhhhhhhhhhhhhbhhhhhhhhhhhhhhhhhhhhhm'+fill('h',44)+'lkyyhjttmcyqtzzbszqztlljtyyllqllqyzjlbdzlslyyzyfszsnhnczqzbbwck rbcyzmthgjmzlshtclzbleqhxflyljqbz'+fill('h',86)+'jjjjjjjjhstbmzjlxfnbgxjztsfjmssnxlkbhsjhtnlzdntlsjgzjyjczxyhygwrwqnztn fjscpzshzjfyrdjfzjzbfzqchzxfysbzq'+fill('j',86)+'kjjjjjjjzsgyfttdcszxzjbqmszkjrhyjzcgbjkhcggtjkjqglxbxfgdrdylxjgdtsjxgj jjzwzlcqsbtxhqbxttxhxftsdkfjhzyjf'+fill('j',35)+'y'+fill('j',58)+'x zcdlllcqcqzqwqxswtwgwbzcgzllqzbclmqqtzgzxzxljfrmyzflxysqxxjk xrmjdzdmmyybsqbhgzmwfwtgmxlzbyytg'+fill('j',93)+'zwccdxyzxswg yjyznbgpzjcqswxsjrtfyzgrhztxszzthcbfclsyxzljqmzlmp lxzjxclbysmqhxjsxrxsjzzzsslyflczjjjxjjkkkg'+fill('k',84)+'rcrxhhzxqydshjsjjhqcjjbdynsysxjbqlpxqpy'
ls_letter=ls_letter+'mlxzkyxljcjlcysxxzzlllll hrzzdxytwxsxffqbpxzgygztcqwyltlsgkkkkkkkkkkk'+fill('l',83)+'mgzjmmgtjfsgzyafsmlbfcwbjcljmzlpjjlmdyyyfbygyzmyzyrqqhxyykqyly fsfslnqgcfhccfxblblzyxxxkhhxshjds'+fill('l',94)+'xczwhhhplhalpqahxdlgggdneztpyqjjcljzljlhyhyqydhz zczywteyt hsl jbdgwxpcd tjckllwkllcsstknzdnqntt'+fill('l',71)+'mmmmmmmmmmmmmmmmmmmmmmmzsszyqkcgbhcrrychbppyrwqbbxkdbbbqtffznpzfxmqkcypzxehzgztcmxxmx nwwxjyhlctmcsjtjjyxtctdnpglzcjlsb'+fill('m',94)+'plqhdnndszjdpgwmndclodansyzrdwjjdbcqwstszyljpxlocbgpcjfzljylxc tnlcgxtpzjwc xwfzdknjcjlltqcbxnqz'+fill('m',30)+'mmmm'+fill('n',59)+'xbxklylhzlqzlnzqwglgjjgxbngjdjxtxctyxjjxsjtstppghtxdfptffllxhpk fzflyl bnjhkbmddbcycldxyddqlyjjwqnnnnnnnnnnnnnnnnnnnnnoooooooo'+fill('p',65)+'lcsjpyycldtjpycmgyhzhsztwqwrfxhjjazmrhyyyqpddlybyznbbxyxhzddnh msgbwbzzjc xllrzcwhzlwdgcggnyzpmz'+fill('p',30)+'ppppppppppppppppppppppppppb'+fill('q',30)+'qqqqqqqzhfgdcjeaqqpjlszdcydwldfrybyscnwbxgzmzjtqscpmxjcjychcjwynxxwjn mt mcdqdzllwnkpzgglcczmlbqjqdjjqt'+fill('q',94)
ls_letter=ls_letter+'hqywbzjlttdhhcchflsyytjgcztjbym pdjkxwyyflxncwcxbmaykkjmzzjrxy aqjfljphhhytzjmhsgzjwbwjdyjqqhslzqqqqqqqqqqqqqqqqqqqqqqqqqq'+fill('r',59)+'ssssssssyymyszgrx wysyscsyznlqyljxcxtlwdqjpcycyppnxfyrcmsmslxglgctlxygz gztcp sllytmtzalzpojtjwtcyyjblbzl'+fill('s',94)+'myljbghdlssdhbdcsxhamlzbjmcnhjyjygchskqmzzlwjtsmocdjlyqzhjmyby lyetfjfrfksyxfdwdsxxlwsjslyxsnxwy'+fill('s',93)+'xhahhjzxwmljcsqlkydttzslfdxgzjksxybdpwnzwpqzczenychqfjykbdmljqq qslyxxylljdzbymhbstt qwlhogwblzz'+fill('s',61)+'xssssssssssssssssssssssssssstttttlxqlterrqlstmypyxjjxqsjfbxyxyjllyqylthylymlkljdmllhfzwkhljlhlj klj tlqxylmbtxchxcfxlhhhjbyzzkbxs'+fill('t',94)+'qd jzyygzxbebcqwyyjqtqwjyqqzmwffhfrbndpcjlfzgpbxdbbztgylchbfly xlypjsywmngqlxjqjtcbhxzpxlbyyjddh'+fill('t',57)+fill('w',37)+'jqyjxlldtkhhbfwdysqwnwldebdwcm ljtmxmjsxynwfymwrxxysztzztymldq lwayyjbscqwlbrjwxhybhydnhhgmywytz'+fill('w',83)+'xxxxxxxxxxx qtsdlwdcjpyjlqyjwxmzzmylclmxcmzsqtzpjqblgxjzfljjycjnxwcxsccdl dyjdjjxsqyclzxzzxmxqrjhzjbhfljlml'+fill('x',34)+'s'
ls_letter=ls_letter+fill('x',59)+'nldxzlllpypnyysxcqhcmjzzhnpzmekmxkyqlxsdlyhwdcwdzgyyfpjzdyzjtx rzjcyrtlbyzbsjkxzypbdfgzzrytngxzqxxxxxxxxxxxxxj'+fill('x',33)+'h'+fill('x',34)+'cxxxxxxxxxxymb nqkrjjbjerzgykx knsjkljsgzljybzsqlbcktylccdlpfyydzyjgkqttfc xdkdyyyfytyypdwtghrynjcbsnyjhkllsxxxxxxxxxxxxxxxxxxxxxxxx'+fill('y',71)+'dxxwbcjsbbpjjjcjdzbfxxbrmlaygcsnclddtblpz dwsbxbcllxxlzdjzsjy lyxbf bhjjjgbygjpmmmpssczjmtlyzjx'+fill('y',94)+'wxtyledqpjmygqzjgdblqjwjqllsdgytqjczcjdzhqg gjhqxnjldbxsgzhcwy ljwywydfkqjjfxdhctxjyrxysqtjxyeb'+fill('y',95)+'ssyxjnncyzxfxmsyszxyyschshxzzzgzzgfjdldynpzgyjyzdyqzpbxqbdztzc zyxxyhgsqxshcggqhjhgxwszdmmehyxge'+fill('y',30)+'yyyyyyyyyyyyyyyyyy'+fill('z',39)+'czzzzzzdylzkkwjzrcleketdbcykqqsayxcjxwwgsbhjszsdhcsjkjcxswxfltynydbzc czjqtzwjqdzzzqzljjhlnbhpydxpdxshgzzzszzzzzzzzzzzzzzzzzzn'+fill('z',35)+'s'+fill('z',36)+'dxfptjqyzzxhyagncfzyyhxgnqmywxtzspdhhgymxmxqzhtsbcqyjyxhtyyzy bclmmszmjzjllcogxzaajzyhjmzhwdxzs'+fill('z',95)+'dznleyjjzjbhqwjzsqtzpsxztdsxjjlnyazhhyysrnqdthzhay'
ls_letter=ls_letter+'jyjhdzjzlsw clybzyecwcycrylcxnhzydzydtrxxbzsx'+fill('z',89)+' qhxjhhljxlgdlqfdbsxfzzyychtyyybhecykgjfxbzjfxbwhdzfyapnpgdymshk mamnbyjtmxyycthjbzyfcgtyhwphftgzzcjwgnspgcgnesypbtyyzdxykygtdjnnjqmbsgzscyjsyyqpgkbzgycywjkgkljywkpjqhytwddzlsymrypywwcckznkyygzsbzegpbmdskftycmhbllhgpzjxzjgzjyxzsbbqsczzlzc stpgxmjsfdcczjz djmcybzlfcjsazfgszlybcwzzbyzdzypsttngjeykkzytcjnmcylqlypysfqrpzslwbtgkjfyxjwzltbncxjjjjtxdttsqzycdxxhgckbphffsswybgmxlpbylllhlxyjgxzbdsy xlgzybzfyxtxccxtzlsqyxzgqdczddxzjjqcgxtdgscxzsyjjqcw ldqztqcgjqjzyezwkgcpypqtynlmkcqzjspzmyjhsojnghdzqyklgjhsgqzhxqgkezzwyscscjxyeyxadzpmdssmzjzqjyzcdjzwqjbyzbxgznzcpwhwxhqkmwfbpbybjnyjddzqzxdbzjcdqcdcknqbqmsjq jjwwjjnjnlllwjzqjdzpzydcydzcttb znztqzddjlzbclltdsxkjzqdpzlzntjxzdtjzzkqxylygxfptyjyyzpszlfchmqshgmxxsxjjsdcsbbqbefsjyhxwgzkpylqbgldlcdtnmayddkssngycsgxlyzaypncjltqjldgdbbjqdcjwynzyzcdwllxwlrxntqjczxkjldftdglrlajjk ymkqll tzytdyyczgjyxdxfrskstqdenqmrkqzhhptsdkdylhgymylcxpycjndqjwxqxfyyfjlejpzrxccqwqqsbzkymgplbmjrqcflnymyqmt'
ls_letter=ls_letter+'qyrbzjthztqfrxqhxmqjcjlykdldazfkypbggpzfebzzykyqspegjjglkqzzzslysywyzwfqzylzzlzhwcgkyp qgnpgblplerjykcccyyhsbzfwbnyytgzxqgjmshzkbswyemyltxpsydswlycjqxsjnqbsctyhbftdcyzdjwyghqfsxwckqkxebptlpxjzsrmebwhjlbjslyysmdxlcyljczwhxzjzblfflgskhyjzeyjhlplllldzlwczblcybb bcbbnnzcyrfsrcgyt qzwtzdhdezcnzzwtyqhdynyjlxdjyqdjyqkxlhxjrzjmfqhxhwywsbhtrxxglhqhfnmnykldyxzpylggtmtcfpnjjzyljtyanjgbjplqgdzyqyaxbkysecjsznslyzzwlshglbcjbyzjyctdyndsactszyyegdwnycxtdzysmgzsccsddlccrqxyyelsm hztebblyylltqsyfwfkbxsychbjbwkgskzxlzcghpxzhznytdsbcjkdlzayfmytlebbgqyzkggldndnyskjshdlyxbcgyxypkdjmmzngmmclgezszxzjfznmlzzthcsxjhgxgnlycdlfwljgbqjaqqzjplnybxjyqymrbsyyhkxxstmxrczzywxyhymcf lzhqwqxdbxbzwzmldmyckfmklzcyjyczhydbdllscddnlkjykjsycjlkwhqasdknhcsgaehdaashtcplcpqybsdmpjlpcjoqlcdhjxysprchnwjnlhlyyqyhwzptdzxzlyyzmddzyftqpczcyypfhwllytzdzjdtqcyfksccyyazjpcolzyjtpnyyynrs ylmmnxjsmybssljgyldzdpqbzzblfndsjwwmzffjqqqqyxaclbhkdjxdgmmydqxzllsygxgkjrywzwyclzmssjzldbydcpcxyhlxchyzjqsfqagmnyxpfrkssbjlyxyczfywggqmrdsxycytx'
ls_letter=ls_letter+'nqqjpyybfqjdyqfbnqejdgyqbxrcnfyyqbghyjdyzxgr htkyl wdzntsmpklbcgbpyszbydjzsszjsyglnscmhcwwmnzjjlxxhchsydsttxrycyxbyhzsmxjsznpwgpxxtaybgajcxlysdccwzocwkccsbnhcpdyznfcyytyckxytxzbhbscsbzczptqfzmqflypybbjgxzmnxdjmthyskkbtxhjcegbsmhyjzcjt mljyhrzzslxjqpyzhmkttxxjcljprmyygkybsqkkytqqxfcwchcykelzqbsqyjqcclmthsywhmktlkjlycxwheqqhtqkzpqsqscfymmdmgbwhwlgsllysdlmlxpthmjdyskjs dhrzkqxnyztcggydlmlwxybsycdbhjhjfcwztj wtkclxqshlyczjxe mplpdcgltbzztlnjcyjgdtcfglpllqpjmhwljzyhzjxhtxjlhxrswlwzjcbxmhzqxsdzpmgfcsglsxymqshxpjxwmyqksmyplrthbxftpmhyxlchlhlzylxgsssstczbabgyzlaktkdwczzbnzdtdyqzjyjgmctxldgcszlmlhbglkfwnwhdx hlfmkyd lgxdtwwfrjejztzhydxykshwfzcqshktqsldclrpbhzhxyyfhbbgdmycnqqwlqhjjzywjzyejjdhpblqxtqkwhlchqxagtlxljxmslxhtzkzjkcxjcjnmfbycsfywyqhtzhymjdjskhxzjqbzzxympagqmcdbxlskyynwrtsqgsdbpdbsgzwyhtlksssw gzzlyytnxjgmjszs fwnlsoztxgxlsmmljzgnysdzsqyrsljpclpwxsdwejbjcbcnaytwgmpapclyqpclzxsbnmsggfnzjjbzsfzyndxhplqkzczwalsbccjxjyzgwkwldqzyakqcqctmycfjbslxclzjclxxksbzqclhjphq lsxxckslnhpsfqqyt'
ls_letter=ls_letter+'xy jzlqldtzjjzdyydjntpd zdskjfsljhylypsgxfzfcdkhjgxtlqfsgdslqwzkxtmhsbgzmjzrglyjbpmlmsxlzjqqhzyjczydjwbmjklddpmjegxyhylxhlqyqhkycwqjzlbthydgcjfdyazxdzhzjnhhqbyknxjjqczmlljzkspldsclbblxkleljlbj ycxjxgcnlcqplzlzyjtzlxyjbxmyztwyccjmyyxnatjhyccxzpcqlbzwwytwsqcmlpmyrjcccxfpznzzljplxxyztzlgdltcklyrzzgqtgjhhgjljaxfgfjzslcfdqzyhzbtrblhlczzjadjlmmmsshmybbbskkbhrsxjjmxsdznzpelbbrawggfchgm klltsjyycqlcskywyyhywhbhqywpawykqlclgjdjcznzlljpjqdcclcjxmyzftsxgcgsbrzxjqqctzhgyqtjqqlzxjylylbcyamcstylpdjbyregklzyzhlyszqlznwdq tntkhqcwdqktgpkxhcpdhtw bkdhthlxyyyydespgyzpceqdltbdsdegyjq jcwxssbzxdpydlyjclsxydyexcyyydwndczcllwjqjjjkdgjzolbbzppglghtgzxyghzmycnqsycyhbhgxkamtxyxnbskyzzgjzlqjdfcjxdygjqjjpmgwgjjjpkqsbjaydywtjdaxysrltdpsyxfnejdyzlxllhzyqjhgjhzycshwsgczyjgllnxzjjn fxmfpycyawddhdmczlqzhzyztldywllhygbmmcjssclpqpdxcdyykyfcjddyygywrhjrtgznyqldkljszzgzqzjgdykshpzmtlcpwnjyfyzdjcnmwescyglbtzcgmssmylmbwwkxydtyldjpyw xjmmllhafdllaflbhhhbjtzcqljtfmbmhydcjrddwr qnysnwzbyytbjhpbygtjahgqtystjkbtzllyxys'
ls_letter=ls_letter+'xxbsjsbbsgghfjlypmzjnlyywdqshzxtyywhmcyhywdbxbtlmsyyyfsxjcstxxlhjhfssxzqhfzmzcztqcxzxrttklxb qqhqmjd ttxpgbktlgqxjjjcdhxqdwjlwrfwjgwqhckryswgbtbygbwhd wdfjxxxjzlpyyypayxhydqkxsaxyxgskkdjhnnyzqqmtqdmmgyytxmjgdhcdyzbffallztdltfxmxqzdngwqdbdczjdxbzgsqqddjcmbkzffxmkdmdsyyszcmljdsynywbdddpplcj hqeewjksyykdypltjtpkjltcyyhhjttpltzzcdlthqkzjqyste eywyyzyxpyysddjkllpwmcyhqgxyhcrmbsprskmkmpcklgdbqtfzswtfgglyplljzhgjjgypzltcsmcnbtjbqfkthbyzgkpbbymtdssxtbnpdkleycjnycdykzddhqxpllnqtjpyylfdgfxzpsbtljxxjbswyysksflxlpplbbblbsfxyzsylfffscjds tgtryycyffcyzyzbjtbctsbsdhrtjhbytsyzsctarlltkzlgecllkjlqjaqnbdkkghpjtzqksecshalqfmmgjnlyjbbtmlyzxdtjpldlpcqdhzycbzsczbzmsljflkrxyjelxbnebjdsyxyhgcjzbxbydfzwgenyhhhjhatfwgzstbgxklstywmtmbyxj skzscdyqrcwxzfhmymcxlzndtdhlxdjggzjsnfrgjhxpdhyjybzgdlqcsezgxlblhyxtwmabchecmwyjyzlljjyhlgbdjlslygkdzpzxjyyzlwcxszfgwyydlyhcljybfbnbbthfjaaxwfpxmyfhdttcxzzpjrsywzdlybbkdyqpqjpzypzjznjpzjlzt fysbttslmptzrtdxqsjehbzylzdhljsqmcmbjhblyzlycblydpdqysxqzbytdkyxjyycnrjmpdjgklclj'
ls_letter=ls_letter+'bctbjddbblblczqrpyxjcjlzcshltoljnmdddlngkaqhqlhtxtjecxalzdspktlzkqqyfsygywpcpqfhqhytqxzkrsgttsqczlbtxcdyyzss qzslxlzmacbcqbzyxhbsxlzdltcdjtylzjhykheznmshrphqqjchgmfprxhjgdychgklyrzqlcyqjnzsqtkqjymszswlcfqqqxyfggyptqwlmcrnfkkfsyylybmqammyytpzylltxjsjxhlbrybxqzskswwwygyabbztjktgpysbxpbcmllxztbklgqkq lskdfxrdkbfpftbbmfeeqgypzsstlbdpsmyxctpshcptxxzzsmphpshmclmldqfyqxszyjdjjzzhqpdszglstjbckbxyqzjsgpsxqzqzrqtbdkyxzkhhgflbcsmdldzzsjdhlqlzpmsmmsxlqqnknbnddnxxdhddjyyyfqgzlgsmjqgxytqlgpbqxcyzy drjbgtdjyeeshtmjsbwblwhlsffnypmhxdzdblzyycxnncsybzbfglzzxswmsccmqnjqsbdqsjtxxmbltxzclzshzcxrqjgjylxzfjphyjzqqydfqjjlzznzjcdgzyxhpltbqpfbjwjdbygpnxtbfzjgsdddjshxeawzz lltyybwjkgxghlfkxdjtmsz sqynzggswqsbhtlsskmclzxyszqqxncjdztxmzysctlkphtxhtlbjxjlxscdqxcbbtjfqzfsltjbtkqbxxjjljchczdbzjdczjdcprnpqcjpfczlclzxzdmxmphjsgzgzdlfnyklacjllzlmzjnhydsshthxzlzjbbhqzwwy rdhlyqqjbeyfsgxwhsrx wjhwpslmssgz tyeyqqwrslal mjtqjsmgszzqlylwtjpfsyaxmcjbtzyycwmytzsjjlqcqlwzmalbxyfbpnlsfhtgjwejjxxglljstgshjqlzfkcgnndszfdeq'
ls_letter=ls_letter+'fhbxqbjjzjqtyzkxbyqxbjxshztsfglxmxzxfghkzssggylclsarjyhslllmzxelgl xdjtbgyzbpktzhkzjyqsbctwwqjpjwxhgaqtgylbxmmygszldydqmjjrgbjtkgdhgkblqkbdmbylxwcxyttybkmrtjzxqjbhlmhmjjzmqasldcyxyqdlqcafywyxqhzgnyfljbyfdjfrgsfmbyzhqfbwj yfaggphzbyyzffwodgrlbftwlbzgycgxcdj ygzyyyytytydwegazahxj zyyhlrmgrxx'+space(93)+'dclhneljjthtbwjybjjbxjjtjteekhwsljplpsfazpqqbdlqjjtyyqlyzkdksqj yyqzldqcgjjyzjs cmraqthtejmbctyhy'+space(93)+'bkmhyzw dqfhyyxwshctxrljgjxhccyyyjltktsytmxgtcjtzayyoczlylbszyw jytsjyhbyshfjlygjxxtmzyyltxxypzlx'+space(93)+'yjzyzyybnhmymdyylblhlsyyggllsqxlxhdwkqgyshqywljyyhzmsljljjcjjyy cbcpzjmylcjlnjjjlxyjmlzjqlycmhcfm'+space(93)+'mfpqqmfylmcfqmmmz fhjgtthkhchydxtmjdymyydyyydydcymdydlfmycqzwzz mabtbzmdzgdfycgqyttsfwbdtzqssstjj'+space(93)+'hjytsxlywwkxexwznnqzjjjjccchyyxbzxzcyjtllcqxynjycyycynzcqyyoewy czdcjehylpwp mlgkdldgqbchjxy'
for i = 1 to li_string_len
if asc(mid(ls_string,i,1)) > 128 then
ls_string_hz = mid(ls_string,i,2)
ll_count = 190 * (asc(left(ls_string_hz,1)) - 129) + asc(right(ls_string_hz,1)) - 64 + 1
if ll_count < 1 then
ls_rtn_string = ls_rtn_string + "Z"//"?"
else
if ll_count>len(ls_letter) then
ls_rtn_string = ls_rtn_string + "Z"//"?" default Z if not found
else
ls_rtn_string = ls_rtn_string + mid(ls_letter,ll_count,1)
end if
end if
i = i + 1
else
ls_rtn_string = ls_rtn_string + mid(ls_string,i,1)
end if
next
return trim(upper(ls_rtn_string))
end function
#endregion
如何取汉字的第一个拼音字母(一)相关推荐
- php取汉字第一个字,php---------取汉字的第一个字的首字母
2019独角兽企业重金招聘Python工程师标准>>> 开发中用到的方法,取出第一个汉字的首字母: /** * 取汉字的第一个字的首字母 * @param string $str * ...
- 城市列表取汉字的第一个字的首字母并排序功能
先上图效果: 数据结构原来是这样: Array ([0] => Array([sid] => 2885842[recetcstoredpay] => 24000[recetclpri ...
- mysql城市表含字首字母_城市列表取汉字的第一个字的首字母并排序功能
/** * 取汉字的第一个字的首字母 * @param type $str * @return string|null * @user qichao * @date 2017-04-13*/ publ ...
- mysql:取group by第一条数据
mysql:取group by第一条数据 示例数据(表enterprise_info) SELECT * FROM enterprise_info; id name gdp update_time 1 ...
- mysql分组取出每组地一条数据_MYSQL实现分组排序并取组内第一条数据
一.需要实现分组排序并且取组内状态优先级最高的数据 有一张这样的数据表, 需求是根据error_type分组然后取status最小的第一条数据 第一种写法: select t.* from ( sel ...
- 取汉字的拼音简码.如果是其它字符,则原样返回(2010)
以前用过很多中取汉子拼音的方法,一直有些字是取不出来的 没办法,只有从微软的拼音库把所有的字取出来了,应该没有取不出来的字了.... '-------------------------------- ...
- 在Excel中取汉字的英文首字母或者全拼
与上一篇文章相关,在Excel中取汉字的英文首字母 在Excel中使用,觉得麻烦的,直接点最下面,复制附件,里面有例子,非常好用非常好用 需要说明的是,代码不是我写的,原作者如果看到了可以联系我,我会 ...
- 取汉字拼音,取汉字英文首字母
import android.text.TextUtils;import java.util.regex.Matcher; import java.util.regex.Pattern;/**** 拼 ...
- 【编程技巧】Stream流之list转map、分组取每组第一条
编程技巧-Stream流之list转map.分组取每组第一条 目录 编程技巧-Stream流之list转map.分组取每组第一条 前言 一.list转map 二.分组取每组第一条数据 总结 前言 JD ...
最新文章
- TI 实时操作系统SYS/BIOS使用总结
- 【JVM调优工具篇】使用MAT工具分析dump文件(查看GC Roots)
- 深度学习总结:GAN,原理,算法描述,pytoch实现
- 如何使WordPress博客添加多个sidebar侧边栏
- POJ 1236 Network of Schools(强连通 Tarjan+缩点)
- 编译人脸识别的时候出现问题
- 十年后,每天 24 小时离不开传感技术
- Excel写入与保存openpyxl
- 微服务整合J2cache并改造使用
- 朱晔的互联网架构实践心得S2E3:品味Kubernetes的设计理念
- 1653 藏头诗
- m个苹果放在n个盘子里面有多少种放法?(动态规划)
- Android开发虚拟机测试没问题,真机调试就出现问题,总是闪退!10秒解决!!
- 美术生都要膜拜的AI,照片迅速被画成艺术画
- docker镜像加速,docker更换为国内镜像
- 100个替代昂贵商业软件的开源应用/100 Open Source Replacements for Expensive Applications
- Java集成Sap/Erp产生的sapjco包重命名/rename问题及解决方案
- Python3.7学习笔记30-垃圾回收机制
- php 毛玻璃,毛玻璃 - 晚晴小筑 - OSCHINA - 中文开源技术交流社区
- 基于php022公司企业网站设计-计算机毕业设计