从彩票开奖结果复制七个数字，如何一次性粘贴到VFP表单的七个文本框？每个文本框各占一个数字。

[ 本帖最后由 wuzhucelela 于 2013-12-6 10:44 编辑 ]

CLEAR
lcstr=[01020304050607]
for lnI=1 TO LEN(lcstr)/2
    lcText=[text]+TRANSFORM(lnI)
    THISFORM.&lcText..value=SUBSTR(lcstr,lnI*2-1,2)
endfor
自己看看放在那个事件中合适

建议在循环中添加控件刷新语句：
THISFORM.&lcText..refresh