如何取汉字的第一个拼音字母(一)

    技术2022-05-11  14

    如何取汉字的第一个拼音字母

     

    #region

    $PBExportHeader$f_get_first_letter_2.srfglobal type f_get_first_letter_2 from function_objectend type

    forward prototypesglobal 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_hzinteger li_string_len, ilong 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 ifnext

    return trim(upper(ls_rtn_string))

    end function

    #endregion

     


    最新回复(0)