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

2025-03-11 03:50:36

推荐回答（3个）

回答1：

首先，你需要一个汉字转拼音的程序，如下，给它取名为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 C=CHR(95+j)
EXIT
ENDIF
ENDFOR
ENDIF
py=py+C
ENDFOR
RETURN UPPER(py)
2.brow for 'LH'$gethzpy(姓名)

回答2：

brow fields 字段名1,...,字段名n for 条件

回答3：

E30我就试下看能出来