?? 中文姓名筆畫計(jì)算(vbs腳本版).vbs
字號(hào):
char_wordtable(13)="催傺傻像剽剿勤疊嗄嗅嗉嗌嗍嗑嗒嗓嗔嗜嗝嗡嗣嗤嗥嗦嗨嗪囁嗬嗯嗲噯嗵嗷嘟塌塍塑塘塞塥填塬墓媲媳媵媸媾嫁嫉嫌?jì)軏彐茖嬆瘜泪俞葬栈夏涣诶搬嫖⑾氤铐┯庥薷秀捍茹簧鲬仃蹀ま龈戕鬓掳釘y摁攝攄擺搖擯攤摸敫數(shù)斟新旒暄暇暌暖暗椴椹椽椿楂楔楚楝楞楠楣楦楫楱楷楸楹樓榀概欖榆櫬櫚櫸榘槌槎槐歃歆歇歌殿毀轂毹氳溏源溘溜溟溢溥溧溪溯溱溴溶溷溺溻溽滂滇滏滓滔潷滾滟灄滿瀅濾濫灤濱灘漓漠漭煅煊煌煎煜煞煤煦照煨煲煳煸煺牒犏獻(xiàn)猷猿獒瑁瑕瑗瑙瑚瑜瑞瑟瑰甄畸畹痰痱癡痹痼痿瘀瘁瘃癉瘐皙盟睚睛睡睢督睥睦睨睫睬睹瞄矮硼碇碉碌礙碎碑碓碗碘碚磧磣碰稟禁禊福稔稗稚稞稠穌窟窠窺竇筠筢筮筱筲筷籌筻簽簡糧粱粲粳縛縟縝縫縞纏縭縊縑繽罨罩罪置署群羧耢聘肄肆腠腥腧腩腭腮腰腹腺膩靦膃騰腿舅艄艉蒗蒙蒜蒡蒯蒲蒴蒸蒹蒺蒽蒿蓁蓄蓉蓊蓍蓐蓑蓓蓖藍(lán)薊蘺蕷鎣驀蓬虞蛸蛹蛾蜂蜃蜇蜈蜉蜊蜍蛻蝸蜣衙裔裘裟裨裰裱裸裼裾褂褚覦觜解觥觸訾詹譽(yù)謄謹(jǐn)謾謫谫謬豢貅貉貊賴趑趔跟跣跤跨跪跫跬路跳蹺蹕躚跺躋躲輳輻輯輸轡辭辟遘遛遢遣遙遨鄙鄞鄢鄣酩酪酬酮酯酰醬鑒錆鍺锘錯(cuò)錨錛锝錁錕錫錮鑼錘錐錦锨錈锪锫錟錠鍵鋸錳錙闔闐闕障雉雍雎雛零雷雹霧靖靳靴靶韙韞韻頤頻頹頷穎颼饃餾饈驁騮騫騸骰骱髡魁魂鲅鲆鲇鱸鮒鮑鱟鮐鵡鵲鹋鵪鵯鵬鶉麂鼓鼠齟齡"
char_wordtable(14)="齙齠僖僚僦僧僬僭僮僳儆兢凳劁劂廝嗽嗾嘀嘁嘈嘉嘌嘎嘏噓嘛嘞嘣嚶嘧塾墁境墅墉墑墻墚夤夥嫖嫘嫜嫠嫡嫣嫦嫩嬙孵察寡寤寥寨屣嶂幔幛廑廖弊彰愿慕慝慢慵慷截戩搴搿摔摘摞摧摭摹摺撂攖撇撖敲斡旖旗暝曖暨榍榕榛榜榧榨榫榭榱榴榷榻槁槊槔檻檳櫧槭模歉殯毓滴滹漂漆漉漏演漕漤漩漪漫漯漱漳漶漾瀠瀟瀲濰潢潴澉煽熄熊熏熔熘熙熬犒獍獐瑭瑤璦璃甍疑瘊瘌瘕瘞瘺瘙瘟瘥瘦瘩睽睪睿瞀瞅瞍碟碡碣碥碧堿碲碳碴碹磁磋禚穩(wěn)窨窬窶竭端箅箍箐箔箕算箜箝管箢簀篋籜籮簞簫箬箸粹粼粽精糝綦綮縹縵縲纓縮繆繅罌罱羆翟翠翡翥耥聚肇腐膀膂膈膊膏臏膜臧輿舔舞艋蓰蓼蓿蔌蔑蔓蔗蔚蔟蔡蔫薔蔸蘞藺蔻藹蔽蕖蜀蜘蜚蜜蜞蠟蜢蜥蜩蜮蜱蜴蜷蜻蜾蜿蠅蟈蟬螂裳裴裹褊褐褓褙褸褡褪覯觫誓譚譖譙讕譜譎豪貌贅賻賺賽赫跽踅踉踴躊轅轄輾辣遭遮鄯鄱酲酴酵酶酷酸酹釅釃釀銎鑾鍥鍇鏘鍶鍔鍤鍬鍾鍛鎪鍰锿鍍鎂鏤鐨镅闞隧雌雒需霽霆靜靼鞅韜韶顆饉饅驃騾驄骶骷髦魃魄魅鮭鮚鮪鮞鱭鮫鮮鲞鱘鶘鶚鶻鶿鹛鶩麼鼐鼻"
char_wordtable(15)="齜齦僵僻儇儋凜劈劐勰嘬嘭囑嘲嘶嘹嘻嘿噌噍噎噔噗噘噙嚕噢噶墀增墟墨墩嬉寮履屨嶙嶝幞幡幢廛影徵德慧慰憋憎憔憧憨憬懂戮摩撅撐撒撕撙撞撤撩撬播撮撰攆擷擼攛擒敷暮暴暹槲槽槿樊樗樘樟橫檣櫻橄橡橥毅滕潘潛潦潭潮潲潸潺潼澄澈澌澍澎瀾澳熟熠熨熳熵牖獗獠瑾璀璁璇璋瓔璜畿瘛瘠瘢瘤癟癱瘼瞌瞎瞑瞞瞢碾磅磉磊磐磔磕磙稷稹稻稼稽稿窳箭箱箴篁篆篇篌簣簍糅糇糈糊糌糍纈繚繕繒羯羰翦翩耦耬聵聰膘膛膝膣艏艘蔬蕃蕈蕉蕊蕙蕞蕤蕨蘄蘊(yùn)蕺虢蝌蝎蝓蝗蝙蝠蝣蝤蝥蝮蝰蝴蝶蝻螻蝽蠑螋褒褥褫襤覲覷觶讞譴譫豌豫賾赭趟趣踏踔踝踞踟踢踣踩蹤躓踮躑踺躺轆遴遵醅醇醉醋醌鋈鏌鎮(zhèn)鎘鑷鐫鎳镎鎦鎬鎊鎰鎵鑌霄震霈霉靠靨鞋鞍韃鞒題顎顓顏額飄饜馓饌驏骸骺骼髫髯魘鯁鱺鰱鰹鯉鰣?chǎng)滜咍忰岞a鷂鶼鶴麾黎"
char_wordtable(16)="齏齬齪儒冀凝劓嘴噤器噩噪噫噬噱噻噼嚆圜墼壁壅嬖嬗嬴寰廨廩徼憝憩憷憾懈懊懶懔撼搟擂擅操擎擐擗擻整斕暾樨樵樽樾橇橐橘橙橛櫥櫓櫞檎檠歙殪氅氆氌潞澡澧澶澹激濂濉瀨瀕熹燃燎燔燕燠燧犟獬獺璞瓢甏甑瘭瘰瘳瘴瘵瘸癮癭癀癃盥瞟瞠瞥瞰磨磬磲磺禧穆穡窿篙篚篝篡篥篦篪籃籬篷糕糖糗糙韁繾繰繯繳罹羲翮翰翱耨耩耪聱膦膨膪膳臻蕹蕻蕾薄薅薇薏薛薜薤薨薪藪薯螃螅螈融螓螗螟螨螭螯蟆蟒衡褰褶贗贊贈(zèng)踱踵踹踽蹀蹁蹂蹄蹉轍轔辨辯遽避邀邂鄹醍醐醑醒醚醛鏨鏢鏜鏝鏍鏞鏡鏑鏃鏇隰雕霍霎霏霓霖靛鞔鞘顳顢顛顙飆飚餐髭髹髻魈魎鯖鯪鯫鯡鯤鯧鲴鯢鯰鯛鯨鲺鯔鸚鷓鷚鹺麇麈黌黔默"
char_wordtable(17)="鼽儡嚅嚎嚏嚓壑壕嬲嬤孺嶷徽懋懣懦戴擘擢擤擦曙朦檀檄檐檑檗檁檬濞濠濡濮濯燥燮爵獯璐璨璩甓疃癌癍皤瞧矚瞪瞬瞳瞵磴磷礁礅穗篼篾簇簋簌簏籪簧糜糟糠縻繁繇罄罅罾羈翳翼膺膻臀臁臂臃臆臊臌艚薰薷薹藁藉藏藐蘚螫螬螳螵螺螽蟀蟊蟋蟑蟓蟥襁襄觳謇豁豳貔貘贍贏蹇蹈蹊蹋躡蹣辮邃邈醢醣鍪鐔镢鐐鏷镥鐓鑭鐠镩鏹鐙隳霜霞鞠馘驟髀髁魍魏鲼鰈鰓鱷鰍鰒鰉鳊鳋鷯鷦鷲鷸麋黏黛黜黻鼢鼾齲"
char_wordtable(18)="齷龠囅囂彝懵戳曛曜檫瀑燹璧癔癖癜癩瞻瞽瞿礓礞簟簦簪糨翻艟藕藜藤藩蟛蟠蟪蟮襟覆謦蹙蹦蹩躇邋醪鎏鏊鑊鐳鐲鐮鐿讎鞣鞫鞭韉顥餮馥髂髏鬃鬈鰲鰭鰨鰥鰩鷺鷹"
char_wordtable(19)="黝黟黠鼬嚯孽巔攀攉攢曝瀚瀛瀣爆璺瓣疆癬礤簸簿籀籟纘羸羹艨藻藿蘅蘑蘧蟹蟾蠃蠊蠓蠖襞襦警讖蹬蹭蹯躕蹲蹴蹶蹼躥酃醭醮醯鏖镲霪靄靡鞲鞴顫驥髖髕鬏魑鰳鰾鱈鱉鰻鳘鳙鹱麒麓"
char_wordtable(20)="麴黢黼鼗嚷嚼壤孀巍攘曦瀵瀹灌獾瓚矍籍糯纂耀蘗蘩蠕蠛譬躁躅酆醴醵鑣霰颥馨驤鬢魔鱖鱔鱗"
char_wordtable(21)="鱒黥黧黷黲鼉鼯夔曩灝爝癲礴禳羼蠡蠢贛躪醺鐾露霸霹顰髓"
char_wordtable(22)="鱧麝黯鼙囊懿氍瓤穰耱蘸蘼躐躔鑲"
char_wordtable(23)="霾饔饕髑鬻鸛麟攥攫癯罐趲躦顴"
char_wordtable(24)="鬟鼷鼴齄灞矗蠲蠹衢襻躞鑫"
char_wordtable(25)="鬣馕囔戇攮纛"
char_wordtable(26)="蠼爨"
wordnum_i=0
wordnum_j=0
wordnum_k=0
for wordnum_i=1 to Len(my_char_word)
temp_wordnum=Mid(my_char_word,wordnum_i,1)
for wordnum_j=1 to 26
if instr(1,char_wordtable(wordnum_j),temp_wordnum)>0 then
wordnum_k=wordnum_k+wordnum_j
exit for
end if
next
next
char_wordnum=wordnum_k
End Function
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -