表 字段 姓名 年龄
内容 宋某某 20
宋某 30
王某 20
王某某 60
在下想实现以下功能
列表框1中显示 姓名字段
然后将这些字段 如 宋某某 和宋某 统计到 姓宋 的一个 控件中(文本或者 其他?) ;
在一个控件中显示年龄总和。
如何实现???
追问 大家有源码实例么????
------解决方案--------------------------------------------------------
*---VFP6.0代码
*---表单运行前将数据表(假设为AA),添加到表单的运行环境中。
local cxm
cxm=""
with thisform.list1
.columncount=1 &&列表框显示1列
.rowsource="aa.姓名" &&列表框数据源为"姓名"字段
.rowsourcetype=6 && 列表框数据类型为"字段"
endwith
scan
cxm=cxm+alltrim(姓名)+","
endscan
thisform.edit1.value=substr(cxm,1,len(cxm)-1) &&编辑框显示姓名
sum 年龄 to nl
thisform.text1.value=transform(nl) &&文本框显示年龄