只有建立一个对照表数据库只有GB-2312中的一级汉字是按拼音排序的
才千多个常用汉字而已
汉字总共多少个?
VB的字符串是UniCode格式的,有13000多个汉字
根据区位码只能匹配10%左右
至于五笔就更不可能了
先别说根据字模识别汉字笔划还处于摸索阶段
就是让计算机根据汉字笔划生成五笔编码就够难了
才千多个常用汉字而已
汉字总共多少个?
VB的字符串是UniCode格式的,有13000多个汉字
根据区位码只能匹配10%左右
至于五笔就更不可能了
先别说根据字模识别汉字笔划还处于摸索阶段
就是让计算机根据汉字笔划生成五笔编码就够难了
解决方案 »
- 关于winsocket控件的问题
- datagrid小问题
- 如何用VBA代码检测PPT中设置的对象(如图片)的动画速度(如中速2秒)
- treeview显示图标
- 这个EXCEL宏出了问题?
- 初学VB的面向-对象自定义事件的问题
- 本人开发的AAFlexGrid表格控件发布,请大家帮助测试使用。
- datareport在预览和打印前如何先调出打印机选择对话框和纸张选择对话框 而后将选择的打印机和纸张选项应用于 预览和打印
- 不知道该数组的长度怎么定义啊
- (急!在线求解)怎么样以二进制的方式向文件尾部追加数据?
- 我希望绑定好数据库的DBGRID从最后一条记录开始显示,而不是原来的第一条记录开始,要怎么做
- 如何在ActiveX中传递用户自定义类型
http://expert.csdn.net/Expert/topic/1176/1176971.xml?temp=.3135797
Private Type sTab
i As Integer
str As String
End Type
Private Function GetPhoneticize (ByVal s As String) As String
Dim a(396) As sTab
Dim i As Integer
a(0).i = -20319: a(0).str = "a"
a(1).i = -20317: a(1).str = "ai"
a(2).i = -20304: a(2).str = "an"
a(3).i = -20295: a(3).str = "ang"
a(4).i = -20292: a(4).str = "ao"
a(5).i = -20283: a(5).str = "ba"
a(6).i = -20265: a(6).str = "bai"
a(7).i = -20257: a(7).str = "ban"
a(8).i = -20242: a(8).str = "bang"
a(9).i = -20230: a(9).str = "bao"
a(10).i = -20051: a(10).str = "bei"
a(11).i = -20036: a(11).str = "ben"
a(12).i = -20032: a(12).str = "beng"
a(13).i = -20026: a(13).str = "bi"
a(14).i = -20002: a(14).str = "bian"
a(15).i = -19990: a(15).str = "biao"
a(16).i = -19986: a(16).str = "bie"
a(17).i = -19982: a(17).str = "bin"
a(18).i = -19976: a(18).str = "bing"
a(19).i = -19805: a(19).str = "bo"
a(20).i = -19784: a(20).str = "bu"
a(21).i = -19775: a(21).str = "ca"
a(22).i = -19774: a(22).str = "cai"
a(23).i = -19763: a(23).str = "can"
a(24).i = -19756: a(24).str = "cang"
a(25).i = -19751: a(25).str = "cao"
a(26).i = -19746: a(26).str = "ce"
a(27).i = -19741: a(27).str = "ceng"
a(28).i = -19739: a(28).str = "cha"
a(29).i = -19728: a(29).str = "chai"
a(30).i = -19725: a(30).str = "chan"
a(31).i = -19715: a(31).str = "chang"
a(32).i = -19540: a(32).str = "chao"
a(33).i = -19531: a(33).str = "che"
a(34).i = -19525: a(34).str = "chen"
a(35).i = -19515: a(35).str = "cheng"
a(36).i = -19500: a(36).str = "chi"
a(37).i = -19484: a(37).str = "chong"
a(38).i = -19479: a(38).str = "chou"
a(39).i = -19467: a(39).str = "chu"
a(40).i = -19289: a(40).str = "chuai"
a(41).i = -19288: a(41).str = "chuan"
a(42).i = -19281: a(42).str = "chuang"
a(43).i = -19275: a(43).str = "chui"
a(44).i = -19270: a(44).str = "chun"
a(45).i = -19263: a(45).str = "chuo"
a(46).i = -19261: a(46).str = "ci"
a(47).i = -19249: a(47).str = "cong"
a(48).i = -19243: a(48).str = "cou"
a(49).i = -19242: a(49).str = "cu"
a(50).i = -19238: a(50).str = "cuan"
a(51).i = -19235: a(51).str = "cui"
a(52).i = -19227: a(52).str = "cun"
a(53).i = -19224: a(53).str = "cuo"
a(54).i = -19218: a(54).str = "da"
a(55).i = -19212: a(55).str = "dai"
a(56).i = -19038: a(56).str = "dan"
a(57).i = -19023: a(57).str = "dang"
a(58).i = -19018: a(58).str = "dao"
a(59).i = -19006: a(59).str = "de"
a(60).i = -19003: a(60).str = "deng"
a(61).i = -18996: a(61).str = "di"
a(62).i = -18977: a(62).str = "dian"
a(63).i = -18961: a(63).str = "diao"
a(64).i = -18952: a(64).str = "die"
a(65).i = -18783: a(65).str = "ding"
a(66).i = -18774: a(66).str = "diu"
a(67).i = -18773: a(67).str = "dong"
a(68).i = -18763: a(68).str = "dou"
a(69).i = -18756: a(69).str = "du"
a(70).i = -18741: a(70).str = "duan"
a(71).i = -18735: a(71).str = "dui"
a(72).i = -18731: a(72).str = "dun"
a(73).i = -18722: a(73).str = "duo"
a(74).i = -18710: a(74).str = "e"
a(75).i = -18697: a(75).str = "en"
a(76).i = -18696: a(76).str = "er"
a(77).i = -18526: a(77).str = "fa"
a(78).i = -18518: a(78).str = "fan"
a(79).i = -18501: a(79).str = "fang"
a(80).i = -18490: a(80).str = "fei"
a(81).i = -18478: a(81).str = "fen"
a(82).i = -18463: a(82).str = "feng"
a(83).i = -18448: a(83).str = "fo"
a(84).i = -18447: a(84).str = "fou"
a(85).i = -18446: a(85).str = "fu"
a(86).i = -18239: a(86).str = "ga"
a(87).i = -18237: a(87).str = "gai"
a(88).i = -18231: a(88).str = "gan"
a(89).i = -18220: a(89).str = "gang"
a(90).i = -18211: a(90).str = "gao"
a(91).i = -18201: a(91).str = "ge"
a(92).i = -18184: a(92).str = "gei"
a(93).i = -18183: a(93).str = "gen"
a(94).i = -18181: a(94).str = "geng"
a(95).i = -18012: a(95).str = "gong"
a(96).i = -17997: a(96).str = "gou"
a(97).i = -17988: a(97).str = "gu"
a(98).i = -17970: a(98).str = "gua"
a(99).i = -17964: a(99).str = "guai"
a(100).i = -17961: a(100).str = "guan"
a(102).i = -17947: a(102).str = "gui"
a(103).i = -17931: a(103).str = "gun"
a(104).i = -17928: a(104).str = "guo"
a(105).i = -17922: a(105).str = "ha"
a(106).i = -17759: a(106).str = "hai"
a(107).i = -17752: a(107).str = "han"
a(108).i = -17733: a(108).str = "hang"
a(109).i = -17730: a(109).str = "hao"
a(110).i = -17721: a(110).str = "he"
a(111).i = -17703: a(111).str = "hei"
a(112).i = -17701: a(112).str = "hen"
a(113).i = -17697: a(113).str = "heng"
a(114).i = -17692: a(114).str = "hong"
a(115).i = -17683: a(115).str = "hou"
a(116).i = -17676: a(116).str = "hu"
a(117).i = -17496: a(117).str = "hua"
a(118).i = -17487: a(118).str = "huai"
a(119).i = -17482: a(119).str = "huan"
a(120).i = -17468: a(120).str = "huang"
a(121).i = -17454: a(121).str = "hui"
a(122).i = -17433: a(122).str = "hun"
a(123).i = -17427: a(123).str = "huo"
a(124).i = -17417: a(124).str = "ji"
a(125).i = -17202: a(125).str = "jia"
a(126).i = -17185: a(126).str = "jian"
a(127).i = -16983: a(127).str = "jiang"
a(128).i = -16970: a(128).str = "jiao"
a(129).i = -16942: a(129).str = "jie"
a(130).i = -16915: a(130).str = "jin"
a(131).i = -16733: a(131).str = "jing"
a(132).i = -16708: a(132).str = "jiong"
a(133).i = -16706: a(133).str = "jiu"
a(134).i = -16689: a(134).str = "ju"
a(135).i = -16664: a(135).str = "juan"
a(136).i = -16657: a(136).str = "jue"
a(137).i = -16647: a(137).str = "jun"
a(138).i = -16474: a(138).str = "ka"
a(139).i = -16470: a(139).str = "kai"
a(140).i = -16465: a(140).str = "kan"
a(141).i = -16459: a(141).str = "kang"
a(142).i = -16452: a(142).str = "kao"
a(143).i = -16448: a(143).str = "ke"
a(144).i = -16433: a(144).str = "ken"
a(145).i = -16429: a(145).str = "keng"
a(146).i = -16427: a(146).str = "kong"
a(147).i = -16423: a(147).str = "kou"
a(148).i = -16419: a(148).str = "ku"
a(149).i = -16412: a(149).str = "kua"
a(150).i = -16407: a(150).str = "kuai"
a(151).i = -16403: a(151).str = "kuan"
a(152).i = -16401: a(152).str = "kuang"
a(153).i = -16393: a(153).str = "kui"
a(154).i = -16220: a(154).str = "kun"
a(155).i = -16216: a(155).str = "kuo"
a(156).i = -16212: a(156).str = "la"
a(157).i = -16205: a(157).str = "lai"
a(158).i = -16202: a(158).str = "lan"
a(159).i = -16187: a(159).str = "lang"
a(160).i = -16180: a(160).str = "lao"
a(161).i = -16171: a(161).str = "le"
a(162).i = -16169: a(162).str = "lei"
a(163).i = -16158: a(163).str = "leng"
a(164).i = -16155: a(164).str = "li"
a(165).i = -15959: a(165).str = "lia"
a(166).i = -15958: a(166).str = "lian"
a(167).i = -15944: a(167).str = "liang"
a(168).i = -15933: a(168).str = "liao"
a(169).i = -15920: a(169).str = "lie"
a(170).i = -15915: a(170).str = "lin"
a(171).i = -15903: a(171).str = "ling"
a(172).i = -15889: a(172).str = "liu"
a(173).i = -15878: a(173).str = "long"
a(174).i = -15707: a(174).str = "lou"
a(175).i = -15701: a(175).str = "lu"
a(176).i = -15681: a(176).str = "lv"
a(177).i = -15667: a(177).str = "luan"
a(178).i = -15661: a(178).str = "lue"
a(179).i = -15659: a(179).str = "lun"
a(180).i = -15652: a(180).str = "luo"
a(181).i = -15640: a(181).str = "ma"
a(182).i = -15631: a(182).str = "mai"
a(183).i = -15625: a(183).str = "man"
a(184).i = -15454: a(184).str = "mang"
a(185).i = -15448: a(185).str = "mao"
a(186).i = -15436: a(186).str = "me"
a(187).i = -15435: a(187).str = "mei"
a(188).i = -15419: a(188).str = "men"
a(189).i = -15416: a(189).str = "meng"
a(190).i = -15408: a(190).str = "mi"
a(191).i = -15394: a(191).str = "mian"
a(192).i = -15385: a(192).str = "miao"
a(193).i = -15377: a(193).str = "mie"
a(194).i = -15375: a(194).str = "min"
a(195).i = -15369: a(195).str = "ming"
a(196).i = -15363: a(196).str = "miu"
a(197).i = -15362: a(197).str = "mo"
a(198).i = -15183: a(198).str = "mou"
a(199).i = -15180: a(199).str = "mu"
a(200).i = -15165: a(200).str = "na"
a(201).i = -15158: a(201).str = "nai"
a(202).i = -15153: a(202).str = "nan"
a(203).i = -15150: a(203).str = "nang"
a(204).i = -15149: a(204).str = "nao"
a(205).i = -15144: a(205).str = "ne"
a(206).i = -15143: a(206).str = "nei"
a(207).i = -15141: a(207).str = "nen"
a(208).i = -15140: a(208).str = "neng"
a(209).i = -15139: a(209).str = "ni"
a(210).i = -15128: a(210).str = "nian"
a(211).i = -15121: a(211).str = "niang"
a(212).i = -15119: a(212).str = "niao"
a(213).i = -15117: a(213).str = "nie"
a(214).i = -15110: a(214).str = "nin"
a(215).i = -15109: a(215).str = "ning"
a(216).i = -14941: a(216).str = "niu"
a(217).i = -14937: a(217).str = "nong"
a(218).i = -14933: a(218).str = "nu"
a(219).i = -14930: a(219).str = "nv"
a(220).i = -14929: a(220).str = "nuan"
a(221).i = -14928: a(221).str = "nue"
a(222).i = -14926: a(222).str = "nuo"
a(223).i = -14922: a(223).str = "o"
a(224).i = -14921: a(224).str = "ou"
a(225).i = -14914: a(225).str = "pa"
a(226).i = -14908: a(226).str = "pai"
a(227).i = -14902: a(227).str = "pan"
a(228).i = -14894: a(228).str = "pang"
a(229).i = -14889: a(229).str = "pao"
a(230).i = -14882: a(230).str = "pei"
a(231).i = -14873: a(231).str = "pen"
a(232).i = -14871: a(232).str = "peng"
a(233).i = -14857: a(233).str = "pi"
a(234).i = -14678: a(234).str = "pian"
a(235).i = -14674: a(235).str = "piao"
a(236).i = -14670: a(236).str = "pie"
a(237).i = -14668: a(237).str = "pin"
a(238).i = -14663: a(238).str = "ping"
a(239).i = -14654: a(239).str = "po"
a(240).i = -14645: a(240).str = "pu"
a(241).i = -14630: a(241).str = "qi"
a(242).i = -14594: a(242).str = "qia"
a(243).i = -14429: a(243).str = "qian"
a(244).i = -14407: a(244).str = "qiang"
a(245).i = -14399: a(245).str = "qiao"
a(246).i = -14384: a(246).str = "qie"
a(247).i = -14379: a(247).str = "qin"
a(248).i = -14368: a(248).str = "qing"
a(249).i = -14355: a(249).str = "qiong"
a(250).i = -14353: a(250).str = "qiu"
a(251).i = -14345: a(251).str = "qu"
a(252).i = -14170: a(252).str = "quan"
a(253).i = -14159: a(253).str = "que"
a(254).i = -14151: a(254).str = "qun"
a(255).i = -14149: a(255).str = "ran"
a(256).i = -14145: a(256).str = "rang"
a(257).i = -14140: a(257).str = "rao"
a(258).i = -14137: a(258).str = "re"
a(259).i = -14135: a(259).str = "ren"
a(260).i = -14125: a(260).str = "reng"
a(261).i = -14123: a(261).str = "ri"
a(262).i = -14122: a(262).str = "rong"
a(263).i = -14112: a(263).str = "rou"
a(264).i = -14109: a(264).str = "ru"
a(265).i = -14099: a(265).str = "ruan"
a(266).i = -14097: a(266).str = "rui"
a(267).i = -14094: a(267).str = "run"
a(268).i = -14092: a(268).str = "ruo"
a(269).i = -14090: a(269).str = "sa"
a(270).i = -14087: a(270).str = "sai"
a(271).i = -14083: a(271).str = "san"
a(272).i = -13917: a(272).str = "sang"
a(273).i = -13914: a(273).str = "sao"
a(274).i = -13910: a(274).str = "se"
a(275).i = -13907: a(275).str = "sen"
a(276).i = -13906: a(276).str = "seng"
a(277).i = -13905: a(277).str = "sha"
a(278).i = -13896: a(278).str = "shai"
a(279).i = -13894: a(279).str = "shan"
a(280).i = -13878: a(280).str = "shang"
a(281).i = -13870: a(281).str = "shao"
a(282).i = -13859: a(282).str = "she"
a(283).i = -13847: a(283).str = "shen"
a(284).i = -13831: a(284).str = "sheng"
a(285).i = -13658: a(285).str = "shi"
a(286).i = -13611: a(286).str = "shou"
a(287).i = -13601: a(287).str = "shu"
a(288).i = -13406: a(288).str = "shua"
a(289).i = -13404: a(289).str = "shuai"
a(290).i = -13400: a(290).str = "shuan"
a(291).i = -13398: a(291).str = "shuang"
a(292).i = -13395: a(292).str = "shui"
a(293).i = -13391: a(293).str = "shun"
a(294).i = -13387: a(294).str = "shuo"
a(295).i = -13383: a(295).str = "si"
a(296).i = -13367: a(296).str = "song"
a(297).i = -13359: a(297).str = "sou"
a(298).i = -13356: a(298).str = "su"
a(299).i = -13343: a(299).str = "suan"
a(300).i = -13340: a(300).str = "sui"
[email protected]
接上 a(301).i = -13329: a(301).str = "sun"
a(302).i = -13326: a(302).str = "suo"
a(303).i = -13318: a(303).str = "ta"
a(304).i = -13147: a(304).str = "tai"
a(305).i = -13138: a(305).str = "tan"
a(306).i = -13120: a(306).str = "tang"
a(307).i = -13107: a(307).str = "tao"
a(308).i = -13096: a(308).str = "te"
a(309).i = -13095: a(309).str = "teng"
a(310).i = -13091: a(310).str = "ti"
a(311).i = -13076: a(311).str = "tian"
a(312).i = -13068: a(312).str = "tiao"
a(313).i = -13063: a(313).str = "tie"
a(314).i = -13060: a(314).str = "ting"
a(315).i = -12888: a(315).str = "tong"
a(316).i = -12875: a(316).str = "tou"
a(317).i = -12871: a(317).str = "tu"
a(318).i = -12860: a(318).str = "tuan"
a(319).i = -12858: a(319).str = "tui"
a(320).i = -12852: a(320).str = "tun"
a(321).i = -12849: a(321).str = "tuo"
a(322).i = -12838: a(322).str = "wa"
a(323).i = -12831: a(323).str = "wai"
a(324).i = -12829: a(324).str = "wan"
a(325).i = -12812: a(325).str = "wang"
a(326).i = -12802: a(326).str = "wei"
a(327).i = -12607: a(327).str = "wen"
a(328).i = -12597: a(328).str = "weng"
a(329).i = -12594: a(329).str = "wo"
a(330).i = -12585: a(330).str = "wu"
a(331).i = -12556: a(331).str = "xi"
a(332).i = -12359: a(332).str = "xia"
a(333).i = -12346: a(333).str = "xian"
a(334).i = -12320: a(334).str = "xiang"
a(335).i = -12300: a(335).str = "xiao"
a(336).i = -12120: a(336).str = "xie"
a(337).i = -12099: a(337).str = "xin"
a(338).i = -12089: a(338).str = "xing"
a(339).i = -12074: a(339).str = "xiong"
a(340).i = -12067: a(340).str = "xiu"
a(341).i = -12058: a(341).str = "xu"
a(342).i = -12039: a(342).str = "xuan"
a(343).i = -11867: a(343).str = "xue"
a(344).i = -11861: a(344).str = "xun"
a(345).i = -11847: a(345).str = "ya"
a(346).i = -11831: a(346).str = "yan"
a(347).i = -11798: a(347).str = "yang"
a(348).i = -11781: a(348).str = "yao"
a(349).i = -11604: a(349).str = "ye"
a(350).i = -11589: a(350).str = "yi"
a(351).i = -11536: a(351).str = "yin"
a(352).i = -11358: a(352).str = "ying"
a(353).i = -11340: a(353).str = "yo"
a(354).i = -11339: a(354).str = "yong"
a(355).i = -11324: a(355).str = "you"
a(356).i = -11303: a(356).str = "yu"
a(357).i = -11097: a(357).str = "yuan"
a(358).i = -11077: a(358).str = "yue"
a(359).i = -11067: a(359).str = "yun"
a(360).i = -11055: a(360).str = "za"
a(361).i = -11052: a(361).str = "zai"
a(362).i = -11045: a(362).str = "zan"
a(363).i = -11041: a(363).str = "zang"
a(364).i = -11038: a(364).str = "zao"
a(365).i = -11024: a(365).str = "ze"
a(366).i = -11020: a(366).str = "zei"
a(367).i = -11019: a(367).str = "zen"
a(368).i = -11018: a(368).str = "zeng"
a(369).i = -11014: a(369).str = "zha"
a(370).i = -10838: a(370).str = "zhai"
a(371).i = -10832: a(371).str = "zhan"
a(372).i = -10815: a(372).str = "zhang"
a(373).i = -10800: a(373).str = "zhao"
a(374).i = -10790: a(374).str = "zhe"
a(375).i = -10780: a(375).str = "zhen"
a(376).i = -10764: a(376).str = "zheng"
a(377).i = -10587: a(377).str = "zhi"
a(378).i = -10544: a(378).str = "zhong"
a(379).i = -10533: a(379).str = "zhou"
a(380).i = -10519: a(380).str = "zhu"
a(381).i = -10331: a(381).str = "zhua"
a(382).i = -10329: a(382).str = "zhuai"
a(383).i = -10328: a(383).str = "zhuan"
a(384).i = -10322: a(384).str = "zhuang"
a(385).i = -10315: a(385).str = "zhui"
a(386).i = -10309: a(386).str = "zhun"
a(387).i = -10307: a(387).str = "zhuo"
a(388).i = -10296: a(388).str = "zi"
a(389).i = -10281: a(389).str = "zong"
a(390).i = -10274: a(390).str = "zou"
a(391).i = -10270: a(391).str = "zu"
a(392).i = -10262: a(392).str = "zuan"
a(393).i = -10260: a(393).str = "zui"
a(394).i = -10256: a(394).str = "zun"
a(395).i = -10254: a(395).str = "zuo"
a(396).i = -10247: a(396).str = "zz"
For i = 0 To 395
If a(i).i <= Asc(s) And a(i + 1).i > Asc(s) Then
GetPhoneticize = a(i).str
End If
Next i
End Function
Public Function ConvertToLetter(m_word As String) As String
Dim m_temp As String
Dim i As Integer
For i = 1 To Len(m_word)
m_temp = m_temp & Get_Letter(Mid(m_word, i, 1))
Next
ConvertToLetter = m_temp
End Function
Public Function Get_Letter(t1 As String) As String
If Asc(t1) < 0 Then
For i = 1 To 26
If i <> 26 Then
If Asc(t1) >= Asc(Mid(FLAG_WORD, i, 1)) And Asc(t1) < Asc(Mid(FLAG_WORD, i + 1, 1)) Then
Get_Letter = Chr(i + 64)
Exit Function
End If
Else
If Asc(t1) >= Asc(Mid(FLAG_WORD, i, 1)) Then Get_Letter = Chr(i + 64)
End If
Next
Else
If Asc(t1) >= 97 And Asc(t1) <= 122 Then
Get_Letter = UCase(t1)
Else
Get_Letter = t1
End If
End If
End FunctionPublic Function GetWordRange(ByVal letter As String) As W_Range
Dim Temp As Integer
Temp = UCase(letter) - 64
End Function