Shulou(Shulou.com)06/03 Report--

This article will explain in detail how to use VBS to calculate Chinese name strokes. The editor thinks it is very practical, so I share it for you as a reference. I hope you can get something after reading this article.

The code is as follows:

'Chinese name stroke calculation (VBS script version)

Dim word,key

Word=inputbox ("Please enter the text you want to calculate")

If word= "" then

Msgbox "didn't the sample tell you not to enter text?"

Wscript.Quit

End if

Key=char_wordnum (word)

Msgbox key

Function char_wordnum (my_char_word)

Dim char_wordtable (26), wordnum_i,wordnum_j,wordnum_k,temp_wordnum

Temp_wordnum= ""

If my_char_word= "" then

Char_wordnum=0

Exit function

End if

Char_wordtable (0) = ""

Char_wordtable (1) = "B"

Char_wordtable (2) = "Ding Qi is nine years old for two people to spend more than ten years on ten factories"

Char_wordtable (3) = "Wanzhang three up and down without a girl's pill for a long time to beg for a long time to learn to beg for a long time to learn from the loss of Yiwu, the blade, the Qianwei fork, the Tushi, the big woman, the small, the corpse, the mountain, the body, the mountain, the mountain,

Char_wordtable (4) = "not with the black book of Fengdanwei in Yun Chou College to Yun Muji, five wells, Kang Shiren, Dingchi, only the servant Qiu Yisuke is still from Lunkang Yun Gong six Xi Neigang Yuanfeng fierce cutting advice not to homogenize the 30-liter afternoon Bian er calendar and Youshuang anti-Rentian Taifu death Kong Shaoyou Yinchutun Ba currency fantasy 20 memories of Gohu's hand-holding and proscription fighting square no-day saying that the lack of moon wood is no better than Mao's anger, water and fire. Wang Wachi, the Tooth Dog of the claw Father, ordered an obituary to ridicule the shellfish car, Deng Chang, and team Wei Fengfei. "

Char_wordtable (5) = "and Pi Shiqiu, the owner of Bingye Cong Dong Silk, at first, he paid Xiantong Qianqian to write on his behalf to write about the winter in the oranges of his three brothers, and Feng Gongwa issued a ruminant publication." the package was in a hurry, Beizahui half occupied Kaluqian, to send out another ancient sentence, only to call the trumpet Ding, the platform, the right Ye, the Serge, the four holy places, the central authorities, the slaves, the slaves. Young Yifu Fuhong will return to Hong, he will fight and throw away Dan's old book Zhaoshu, Yimin Yongting Juice, Han exterminator, armadillae, Yuanyu, Guagansheng, throwing the field by Jiashen Dianzhu, the white-skinned dish, the spear, the stone, the gift, the burrow, the Gentiana, the Gentiana, the festival, the fighting, the training, the news, the news, the Liaoyang, the Kuang, the path, the hungry control of birds and dragons. "

Char_wordtable (6) = "Cheng loses ping-pong, Qiao Qiao, buys, fights, fights, and looks up to the price of everything." imitating the company Yiwu, Vuvalu, Vuvuzhong, the excellent partner, the Umbrella Weizhuan, the false Weilun, the first sign that the whole party is happy, and then the army farmer's ice horse rushes to decide the punishment to be punished. Liu Zegang created a bad artisan, Kuang Hua, a craftsman, to help print the dangerous pressure, and he called for each to yell, the lucky hanging, the officials of the same name, vomiting to frighten Lu? "Huiyintuan Tuan is in the fair." Guiyang, Shenzhen, Guangzhou, Shenzhen, Guangzhou, Guangzhou, Shenzhen, Shenzhen, Guangzhou, Shaanxi, Jiangsu, western and western provinces, Jiangsu Province, Jiangsu Province, The lamp gray master mother mou rugged Maxi Baiqi bamboo rice series, the red quilt is about the grade, the sheep feather is about the old test of the sheep feather, while the rib muscle minister of the ear is ill-fated in the color of the boat, the tongue is ill-fated, the color of the boat is ill-fated, and the color of the boat is ill-favored. In the west, there is no secret of the false theory that the visit is true, the negative track has reached the migration, so far, the Mai Nabang evil Wu gadolinium yttrium Yan closed the door to run the sakaka Ruan well anti-yang array step page to carry the pack to tame Qi. "

Char_wordtable (7) = "Liangyanli messy Hengmu Boqi partner stretched out to serve like a tenancy, but in a low position, he Tuo Yu lost Buddha served you as a servant, free of exchange." at the beginning of the freeze, the planner helped to rob, to rob, to encourage the doctor to swallow and bark, but the egg county was stingy to swallow, bark, bark, yell, listen, suck, squeak, inhale, suck, blow, roar, yell, yell, suck, suck, blow and roar. Hoarding the garden, the chimney, the site, the pit, the pit, the wall, the wall, the pit, the altar, the dam, the grave, the shell, the sound, the Pull, hold, shake, resist, touch, grab, grab, shake, grab, grab, grab, The boil treatment soap stared at the Yoji social sacrifice show private baldness research the poor department weaves Nu Shu Han Qiang Xiao elbow belly anus, liver oxime intestine, liver oxime intestine, turnip, mustard, Qi, Fen, Bari core, mustard, Qi, Fen, Bari core, flower fluorene, enaphthene, acenaphthene, acenaphthene Jinyuan violates Qiu Pigui's residence in Chiyi, Zou Yun's neighbor, Nail Zhao, ruthenium leap, idle Hong Jian Min, stuffy block, Atuopi's appendage, Lu Longchen, Chen Leen, and wheat turtles, who are ordered to drive donkeys, doves and wheat turtles.

Char_wordtable (8) = "I am eager to enjoy the loss of good breasts, feigning beauty and arrogance to make fun of my nephew's extravagance." his classics Xian Lijing scraped the coupon brake, stabbed the executioner, the impeachment, the humble pawn Zhuo, sold the hexagram, the toilet, and the third counselor, Yoo, Chow, Ya, Bah, Bah, smack, suck, and take the blame. Ah, Gu Guotuo, Tankun, Tantuo, Cructuo, Ni Bian, ao, he, he, Kun, Tan, Tan, Tantuo, Qiuping, Qiangliang, Qianli, Qiangdi, Xiuling, Xiuling, Daiyue, Daiyue, Minan, Xiuling, Xiuling, Daiyue, Guyan, Xiuling, Xiuling, Daiy You are afraid that you will feel sorry for you, feel sorry for yourself, hold on, hold, pull, pull, The rogue atmosphere, the foam, the Ju Tuo River, the boiling oil, the marsh gu, the swamp, the foam, the boiling oil, the boiled oil, the boiling oil, the boiling oil, the boiled oil, the boiling oil, the boiling oil, the boiled oil The group of gentry finely weaved crepe and crepe trippings were overlooked by others, such as Yesu, thigh, limb, shoulder, shoulder Peddlers, greedy, poor, purchase, storage, yoke wheels, soft and roaring, far away, across the country, in the suburbs, in the countryside, in the suburbs, in the countryside, in the suburbs, in the suburbs

Char_wordtable (9) = "before raising Tingliang to insult Hou invade, he urged Russia to be handsome, smart, vulgar, slang, Bao Yu, Minamata, South, Aunt Yao Jiangshu's marriage, Viva Loua, enchanting Laura, the guest room of the twins, Yu Huan Xianggong, sealed "taste the house, shit screen, rugged gorge," the emperor of the gorge with a frame to help you to stop the game, Yoshihiko waited for him to wander around the law, how to be angry, how to think, and how to resent, his parents always felt compassionate, resentful, mournful, sorry, Yun and Bian, Yun and Bian Yun, including the handcuffs to save the arch, the handcuffs, the handcuffs and the hanging. It refers to digging according to the shoulder, digging the tart, scratching, swinging, swinging and supporting the government, so that both stars reflect spring ignorance and yesterday Zhao Zhao is the sun to show that in the daytime, there are seven tangerines dyed with soft grapefruit, pomelo, tussah lemon, tussah lemon, check the coffin, Ke Nai column, Tamarix, persimmon, palisade, palisade, oak fence tree, crooked oak fence tree, poison felt, fluorine radon hydrogen spring pump, clean migration, sprinkling and washing Su Su, Luodong Jin, Hongyi Tao Chau, Tao Chau. Huowajie sent "pouring turbid test" to "economy" Hun Hu Nong Xun salivation charcoal cannon Jiong soot Bing fried stoneware smelting, shining, rotten hydrocarbons, leading fierce cunning, hunting a narrow lion, "Popo Koga, Minshan, Zhenjue Enamel, Ling, Ling, Koga, Minshan, Zhenjue, Enamel, and so on." fear of warts, scars, scabies, scabies, bowels, bowls, pots, boils, bowels, bowls, pots, pots, bowels, bowls, pots, bowels, cups, pots, pots, bowels, shields, eyebrows, eyes, eyes In the autumn seed family of Yuyu, you wear "burglary" in a second, and draw it around the tub of indica seed tie-up knot of indica seed, which is painted around the vat of gorgeous Jiangluo. "play with arsine, droop stomach, gallbladder back guanidine, fetus fat," embryo blade wins, callus, Hu Yinxu, shank vein, sampan, tea cocoon, Zizania caduciflora, anise tea antler, Zizania caduciflora, Zizania nigra, tea antler of Zizania caduciflora, tea antler of Zizania caduciflora, Zizania nigra, tea antler of Zizania caduciflora, Zizania caducifl The medicine, the tortured rainbow, the tabanus, the shrimp, the ant flea, the flea, the tabanus, the shrimp, the ant flea, the flea, the anecdote, the curl, the imam, the false language, the false words, the lure, the lure, the cheap, the expensive, the loan fee, he valiantly went to the Zhao party, the axis, the anecdote, the fan, the fan, the trail, the escape, the reverse election, the poor election, the Hao county, the heavy calcium, the plutonium, the titanium, the barium, the barium, the steel, the key, the tungsten hook, the scandium, the palladium button, the boudoir, the Minlu. Valve Pavilion estrangement and steep courtyard except for "dangerous facial leather, leek sound", Shunbeard squall, bait, rateable dumpling cake, first incense, scold, arrogant Hua, Luo, parallel bone, ghost, gull, raven, bustard, bustard. "

Char_wordtable (10) = "taking advantage of all the haiku salaries in Bo, I give the waiter a lot of stubbornness. If you are looking forward to relying on the promotion of tiredness, Ni and bono, the debt is healthy, the debt is healthy, the Tsukuka is sad, the withering, cutting, dissecting, peeling, peeling, peeling She Xianyuwa slaughtered the banquet family, "Rong Kuan Bing", "shoot shavings", "Eyu steep Peak, majestic Lanlai Table", the weak Xu Tu Lai, the weak Xu Tu Lai, the weak Xu Tu Tu, the fear of forgiveness, forgiveness, grace, grace, resentment, remorse, revulsion, revulsion, and so on. The case of eucalyptus table shackle tong Sang Huan orange tallow branch radial frame bridge birch juniper paddle pile mullion bang tip wu pear martyrdom death helium-oxygen-ammonia-argon liquid paste Zhejiang Bang Zhe Bang Wun Pu Haolang floating sea immersion in the sea Tu Ni, dripping, dripping, rippling, rippling, dripping, rippling, boiling, drying, burning, burning, Xi Davidro Zhuer "Heng class"Xi Davide Zhuer" Heng class "Xi Davidro Zhuer", "Hengban", "Xi Daviluo", "Zhuer", "Hengban", "Xi Daviluo", "Zhuer", "Hengban", "scab", "carbuncle, spasm, wrinkle,"true sleep", "dazzling", "weight anvil", "smashing arsenic", "smashing arsenic", "concrete gravel foundation", "Shunxiang", a secret rent scale, the rank of Qin yangxiang is said to be a narrow Liaoqiao station, "bamboo shoot Wat laugh pen", "powder bar turbulent cable tight" silk embroidery sash, following the lack of a net plough, a lamb shy Weng's wing. The seniors were shamed, Geng Nie, the hips, the pancreas, the carcass, the chest, the amine, the calamines, the coriander, the navel, the amido, the fumes, the coriander, the berries, the nudity, the butterflies, the camphor, the lettuce, the lettuce, the Ulva, the mosquitoes, the gnats, the worms, the oyster aphids, the larvae, the clams, the silkworm, the oyster, the scale, the clams, the nymphs, the nymphs, the peddles, the pedigrees, the clams, the pebbles, the sleeves, the hosiery loops were coveted, please read the libel class, flatter who was tuned. Let's talk about friendship, cowleopard thieves, Jia bribes, stolen money, pick up the fans, bow down, take a sedan chair ride, make it easy, walk through the "delivery road", get away with the Yong Ministry, Piguo Tan Yandan, buy anhydride wine kettle, coltan, cobalt bowl, coltan, molybdenum, tantalum, potassium, uranium, iron, platinum, lead, thallium, molybdenum, tantalum, potassium, uranium, platinum, lead, lead, thallium, bismuth, niobium, beryllium, duo, read, accompany, Ling Ling, Taoling Falcon, difficult to "stubbornly pay attention to" You are hungry, you are discouraged, Li Gao, Jun, Gao, Li, Yu, Li, Li, Yu, Li, Yu, Yu, Li, Wei, Gao, Yu, Li, Li

Char_wordtable (11) = "niches": "niches", "niches,"niches", "snuggles", "snuggles", "snuggles,"niches,"niches,", "niches,"niches", "niches", "snuggles", "snuggles", "snuggles, snuggles, stops, stops, steals, bites, knickers, crowns, crowns, Suji Ji Yin, Wei Tu, Shu Qi, Cui Ya, Song, Fu, Song, Shu, Shu, Yi, Shu, Yi, Ya, Ye, Ying, Ye, Ye, Dendrobium oblique twirl, Han Han, Cao Manwang, Liang Mei, Zi Mengshui, Liang Mei, Zi Mengshui, Liang Mei, Fu Meng, Mengshui, Mengxian, Mengshui, Liang Mei, Zi Meng, Mengxian, Mengshui, Liang Mei, Zi Mengshui, Liang Mei, Zi Meng, Mengshui, Mengshui, Liang Mei, Zi Meng Shun, Liang Mei, Zi Meng, Mengshui, Mengshui, Jiao, Qi Lin, Shu Nao, Amoy, Luang, Song, Gan, Gan, Yan, Yan, Sweet border defects, scratches, hemorrhoids, helmets, pirates, eyes, eyes, The pedicel, the preserved urea, the face, the rudder, the ship, the mushroom, the chrysanthemum fungus, the Gladiolus Isatidis, the Smilax dodder, the Bodhisattva, the anthrax, the naphthalene, the grape, the grape, the naphthalene, the firefly, the Xiao Sayyu, the larva, the clam, the maggot, the cricket, the egg, the egg, the saffron bag, the crotch, the cro The trail toe staggered away from the body and the car was winding and logical.-phenolphthalein wild handcuffs Rhodium, europium, copper, aluminum, indium armour for milling collar, bravery, chromium, Ming, Zheng, cesium, iridium, shovel, ammonium, silver, rubidium, threshold castration, Yan, elucidation, long, Sui Huang, along with the hidden Finch, the snow neck stuffing hall, Vernon, Luan, pigeon luan, Hong deer bran, mahuang Gong. "

Char_wordtable (12) = "blasphemous master, dai suave, best man, Nuo ao, leftover cut, raise Bojusha chef, yell, chirp, chirp, chirp Provoke Happiness, surprise, indignation, shame, panic, peep, peep, paw, paw, paddle, grope, bow, shake, rub, squeeze, squeeze, hug, twist, rub, rub, touch, touch, hold, hold, hold Yudu slag, Bowo Wen, Weigang, Yudu, Bowo, Wenzhou, Weigang, Weihai, Xiangzhanhuang, Weihai, Xiangzhanhuang, Xiangzhanhuang, Xianhai, Xianzhang, Jiaoyan, Jianyan, Qianqi, Qianqin, Qianqin, Luqin, Qiqin, Qiongying, Yan, Fan, Yan, Yan, Wan, Hao, Wan, Hao, Jie, Jie, Xi, Xi, Hao, Wan, Hao, Jie, Xi, Hao, Yan, The window is embarrassed, the nest is finished, the raft basket is built, the Reed, the Zheng feast, the millet, the Guangdong porridge, the dung, the purple catkins, the Burmese cable, the satin, the satin, the slow knitting, the envy, the warping, the spleen, the armpit, the fibula, the wrist Hydrazone, the Shushun outfitting, the calyx, the calyx, the plum, the gourd, the calyx, the calyx, the plum, the flower, the calyx, the calyx, the pedicel, the carom, the pedicel, the peel, the vermiculite. The tortoise trousers, the pants, the trousers, the rumors, the marten, the marten, the redemption, the loss, the loss, the drop, the drop of the rim, the collapse of the rim Wide range gap Yanxiongya set hire Wen Li Liang Han Jie cheek jaw Yingchin dinner greedy trick squid bream bird cuckoo swan goose pellet black tripod

Char_wordtable (13) = "urge the silly elephant to suppress the frequently reduplicated, smelling, chattering, buzzing, buzzing, buzzing The dark Tilia rafter, the rafter, the Hawthorn, the wedge, the neem, the nan mei, the last tree, the wood, the wood, the gavel, the hammer, the Croucher, the locust, the Xin, Xin, Xingge, Xie, Ming, Ming, Xin, Ming, and Mingxi. bromine, drown, drain, simmer, simmer The Jair sleeps, the governor is in harmony, the eyelids, the eyelids, the eyes, the eyelids, the eyes, the eyelids, the eyelids, the eyes, the Octopus pupa moth, bees stings, centipede, toad molt, nude coat, nude coat, chu covet, touch, Zhan Yu transcript, relegation, raccoon dog, dog, knot, kneel, jump, stomp, stamp, avoid, lose, lose, walk, walk, The fledgling thunderstorm, hail, fog, boots, targets, nestles, hail, hail, mackerel, Japanese chub, abalone, horseshoe crab, Japanese mackerel, Japanese mackerel, magpie, quail, quail, muntjac drum rat. "

Char_wordtable (14) = "buck, staff, monks, stools, stools, coughs, snorts, crows, crow, hush, knock, touch, touch, touch, Sorry for the funeral Yudi Hupiao lacquer leaking performance Caozhuanyi Zhangyang, Weixiang Zhangyang, Weixiang, Weixiang, Xixiong, Xiong, Xixi, Xixiang, Hupiao, lacquer, Hupiao, Hupiao, lacquer, Hupiao, Hupiao, lacquer, lacquer, flute, rice dumpling, essence of rice dumplings, Qimani, Zhai jadeite, poppy, jade, jade, Zhao rotted bladder, diaphragm ointment, pin membrane, licking dance, polygonum cardamom, wilting rosecane, wilting rose, withered rose, millet, honey, wax grasshopper lizard, tick, curled dragonfly, cicada roach, Pei wrapped in brown naughty roach, faded oath, vows, beauty, color, shape, appearance, appearance and appearance. The americium tunnel female needs to kill the martingale, tower, mule, sacral skeleton, salmon, tuna, oolitic mackerel, fresh Sturgeon, pelican, osprey, Uighur, babbler.

Char_wordtable (15) = "grin, gums, stiff gums, curls, purses, pouts, tears, bumps, purses, tears, crushes, pry, sows, pulls, throws, pulls, throws, pulls, pulls, pouts, pouts and tears. "Entropy", "Jin Guangxuan", "Huang Ji", "barren scar paralysis", "lying in peace", "crushing pounds", "Lei Pan", "rice crops" manuscripts, "arrow box proverbs", "seal seal chapter," fall short of the basket, "paste", "valiant repair", "Capricorn Carbonate," couple "enlightened Cunningham," bow vegetables, Tibetan mushrooms, banana stamens, cymbals, ferns, "scorpion locusts, bat flies, beetles, beetles, butterflies, bugs, bugs, Standing on the ankle, kicking, stepping on the trail, standing on tiptoe, lying on tiptoe, lying on the reel, following the fermented grains, drunken vinegar quinone, cadmium forceps, nickel pickaxe, gallium, gallium, mildew, mildew, shoes, saddle, jaw, face, face, epiphyseal skeleton, beard, nightmare, silver carp, bonito, minnow, crucian harrier, crane,

Char_wordtable (16) = "dirty Confucianism, hope, agitation, silencer, gimmick, crackle, wall, wall, wall and wall. The awkward reins of the awkward hedgerow cake were seized and killed. The food was expanded, the buds were thin, and the salamanders were mixed with borer mites, chelated toads, and pleats. The pleats were complimented by the foot, foot, Painted bun, mackerel, mackerel, herring, Pomfret, snapper, mullet, parrot, lark, Qianmo.

Char_wordtable (17) = "the puppet, the howl, the trench, the mummy, the coward, the coward, the blow, the moss, the eaves, the purlin, the lemon, the purlin, the lemon, the cancer, the cancer, the momentary pupil, the phosphorus reef, the ear, the loophole, the loophole, the buttocks, the buttocks, the arms, the loopholes, the buttocks, the buttocks, the arms, the loopholes, the buttocks, the arms, the buttocks, the buttocks, the arms, Don't let tapirs win, sugar chains, lutetium upsetting, lanthanum praseodymium, stirrup, frost, jade, condyle, flounder, Gill, crocodile, Loach, wren, elk, moose, moose, clingy, clingy and snoring caries.

Char_wordtable (18) = "unscrupulous people poke accustomed sassafras waterfalls and rustles, purpura, purpura, hairpin, hairpin, lotus root, quinoa, vines, vines, lapels, wok, radium bracelet, sickle, ytterbium, tanned and whipped, wok, radium bracelet, ytterbium, tanned, whip, Hao tie, Fu Fu, iliac bristle, sole, widower, ray, egret, egret."

Char_wordtable (19) = "Swarf weasel, skunk, hips, hips, patella, swim bladder, cod, turtle eel, bighead eel, unicorn"

Char_wordtable (20) = "chew the soil, the widow, the dawn, the badger, the badger, the bad

Char_wordtable (21) = "Trout, leathery, wild, stupid, stupid,

Char_wordtable (22) = "the flesh of the musk deer is dipped in the pouch."

Char_wordtable (23) = "the gladiator, the stork, the lizard, the jug, the zygomatic."

Char_wordtable (24) = "servant girl, mole, mole

Char_wordtable (25) = "hyenas mutter their flag"

Char_wordtable (26) = "thanks"

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 chartered 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

This is the end of the article on "how to use VBS to calculate Chinese name strokes". I hope the above content can be of some help to you, so that you can learn more knowledge. if you think the article is good, please share it for more people to see.

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.