VB代码,将汉字转为拼音,多音字只能取其一,不能很好处理。