如何vfp里用BROW 命令逐字显示字段

来源：百度知道 编辑：UC知道 时间：2024/06/23 00:30:29
在VFP里，如何实现，在一个字段里输入“LH” ，就可以显示“李宏”，“李函生”等字段？以便用户选择。急求

首先，你需要一个汉字转拼音的程序，如下，给它取名为gethzpy.prg
PARAMETERS cHZStr
local py,i,j,c,p0,cStr
p0="吖八嚓咑妸发旮铪讥讥咔垃呣拿讴趴七呥仨他哇哇哇夕丫匝咗"
cStr=''
py=''
FOR i=1 TO LENC(cHZStr)
C='z'
cStr=SUBSTRC(cHZStr,i,1)
IF LEN(cStr)=1
*处理英文字母
C=cStr
ELSE
*处理汉字
LOCAL cComStr
FOR j=1 to 26
cComStr=SUBSTRC(p0,j,1)
IF cStr<cComStr
C=CHR(95+j)
EXIT
ENDIF
ENDFOR
ENDIF
py=py+C
ENDFOR
RETURN UPPER(py)

2.brow for 'LH'$gethzpy(姓名)