VFP 愛用者社區

[zfgg]

因答案内容有数字、汉字、字母及标点符号，打印时常打印到纸的二边。我用substr()截取答案内容，以显示在指定的位置，但出现怪字符现象。程序如下：
_len=len(daan)
nWord=84
nStr=0
nRow=_len/nWord
for r=1 to nRow+1
if r=1
?space(24)+th+"."+alltr(str(recn(),4))+lentoshort(daan,r,nWord)
else
nStr=nStr+nWord+1
?space(20)+lentoshort(daan,nStr,nWord)
endif
endfor

Lentoshort()
function lentoshort
para _an,_cd,_gs
_an=substr(_an,_cd,_gs)
return (_an)

请教大师如何解决？谢谢！

[garfield]

改用 SUBSTRC( )
一個中文或一個英文字皆算一個位置.

[zfgg]

谢谢!已经解决了.