字典翻译 问答 其它 请问VFP中下面这个程序该怎么翻译呢?s=""f=.T.***FOUND***FORi=1TOthisform.List1.CountIFthisform.List1.Selected(i)IFf***FOUND***s=thisform.List1.list(i)f=.F.ELSE***FOUND***s=s+thisform.L
问题标题:
请问VFP中下面这个程序该怎么翻译呢?s=""f=.T.***FOUND***FORi=1TOthisform.List1.CountIFthisform.List1.Selected(i)IFf***FOUND***s=thisform.List1.list(i)f=.F.ELSE***FOUND***s=s+thisform.L
问题描述:

请问VFP中下面这个程序该怎么翻译呢?

s=""

f=.T.

***FOUND***

FORi=1TOthisform.List1.Count

IFthisform.List1.Selected(i)

IFf

***FOUND***

s=thisform.List1.list(i)

f=.F.

ELSE

***FOUND***

s=s+thisform.List1.list(i)

ENDIF

ENDIF

ENDFOR

st="select&sfromordersintocursortmp"

thisform.Grid1.RecordSource=st

蒋嘉之回答:
  设置变量s为空字符串,f为逻辑真,从头到尾搜索列表框(列表框中存放表orders的字段名),若第一次搜索到某一列表项被选中,将其值存入s,若以后再搜索到某一列表项被选中,则将其值追加到s后面,全部搜索完毕,将表orders的用列表框指定的字段内容作为虚拟表tmp,将虚拟表中的内容在表格grid1中显示出来.
点击显示
其它推荐
热门其它推荐
  • 其它