主题：[请教] 如何逐一译出汉字的第一个拼音字母？
北京惬意
[专家分：1330] 发布于 2010-05-27 06:12:00
目前还有的用户希望用汉语拼音的第一个字母做简码查询名称，例如若想查“玉米”，就录入“YM”。谢谢！
最后更新于：2010-05-27 06:14:00
回复列表 （共12个回复）
沙发
黑暗伯爵 [专家分：10] 发布于 2010-05-27 11:35:00
磁力泵：http://www.shenggang.com
板凳
wzxc [专家分：9440] 发布于 2010-05-27 15:33:00
[url=http://]http://bbs.pfan.cn/post-240272.html[/url]
的11楼下载myll.fll
里面有个topy函数，生成指写字符串的拼音首字
3 楼
北京惬意 [专家分：1330] 发布于 2010-05-28 00:36:00
1楼的地址与事无补，2楼的地址要注册密码。
那也谢谢二位老师！
4 楼
homayzh [专家分：7040] 发布于 2010-05-28 01:17:00
Parameter cHzchr
local cPychr,i,j,C,Hz
cPychr=""
set collate to "PINYIN"
PYcode="八嚓咑妸发旮铪讥讥咔垃呣拿讴趴七呥仨他哇哇哇夕丫匝咗"
for i=1 to len(cHzchr)
if asc(substr(cHzchr,i,1))>160
Hz=substr(cHzchr,i,2)
C=""
for j=1 to 26
if substrC(Hz,1,1)<substrc(PYcode,j,1)
C=chr(96+j)
exit
endif
endfor
cPYchr=cPYchr+upper(C)
i=i+1
else
cPYchr=cPYchr+upper(substr(cHZchr,i,1))
endif
endfor
return cPYchr
5 楼
wzxc [专家分：9440] 发布于 2010-05-28 09:23:00
[quote]1楼的地址与事无补，2楼的地址要注册密码。
那也谢谢二位老师！[/quote]
你输入密码就可以下载了呀。
今天梅子终于可以上了。
http://www.meizvfp.com/bbs/dispbbs.asp?boardID=90&ID=58363&page=1
去这下载吧
6 楼
北京惬意 [专家分：1330] 发布于 2010-05-29 07:29:00
wzxc老弟你好：
这么多年你还不知道老兄我笨吗？那个东西我去下了几次都没下好。敬请老弟给下来发到我QQ信箱好吗？十分感谢！
7 楼
fyren [专家分：230] 发布于 2010-05-29 13:05:00
这个看一下是不是你想要的！
http://bbs.pfan.cn/post-318068.html
8 楼
北京惬意 [专家分：1330] 发布于 2010-05-30 06:13:00
wzxc老弟：
你发来的压缩包解开后是“MYFLL.FLL和MYFLLFLL的帮助”两个文件，怎么调用啊？
看在VFP的份上，再拉老兄一把。哈哈！
9 楼
wzxc [专家分：9440] 发布于 2010-05-30 08:16:00
我是彻底地晕了！[em10][em10][em10][em10][em10][em10][em10][em10]
很简单的哟[em35][em35][em35][em35][em35][em35][em35]
[em66][em66][em66][em66][em66][em66]
10 楼
dbfox [专家分：490] 发布于 2010-05-31 10:06:00
四楼的就很好.
我来回复
您所在位置：社区首页 — Visual Foxpro讨论区 — [请教] 如何逐一译出汉字的第一个拼音字母？