将下载的文件添加一个类,引用即可。 eg:Shared Sub PYMWBM(ByVal StrIN As String, ByRef StrOutPYM As String, ByRef StrOutWBM As String) Dim wbpym As New CodeClass StrOutPYM = wbpym.GetSpellCode(Trim(StrIN)) StrOutWBM = wbpym.GetWBCode(Trim(StrIN)) End Sub
大自然公司奉献的精品——自然输入法,是目前超级优秀的准盲打拼音输入法!!! 目前拥有大量稳定、高素质的用户群!经过近20年的开发和积累,最新的版本已经升级到2008。 自然拼音输入法的强大优势: ① 直接辅助码实现盲打:只需在字词的拼音后简单加上偏旁部首的声母,就可接近盲打! ② 整句输入酣畅淋漓,多种快速定位修改方式使修改易于反掌!手指不用移开主键盘! ③ 轻松输入任何不认识汉字——分成两个部件(部首在前),当作词组按拼音输入:如“赟”可按“贝”+“斌”输入,全拼为“beibin”(双拼“b