字段名　　类型
性别　　　字符
月龄　　　字符
体重　　　字符
评价　　　字符

根据表：性别：女
　　　　月龄　　　体重
　　　　　　　　　低体重　　　正常　　超重　　　肥胖　　　　　
　　　　1月　　6　　　　　10　　　　16　　　19　　　　22
　　　　2月　　10　　　　　16　　　　19　　　22　　　　26
例如：1个为2个月的女孩，体重是17，请问如何得到评价为正常？

>低体重　　　正常　　<超重

问题多多，未经思考

月龄、体重可以用数值型。

看不清楼主的体重标准表，各列没有对齐，但处理起来应该不难。
假设第一个表是“体测结果表.dbf”，第二个表是“体重标准表.dbf”，体重标准表的内容如下：

月龄   低体重   正常  超重   肥胖     
1月       10    16    19     22
2月       16    19    22     26
……
以月龄为“1月”的婴儿为例，体重≤10时，为低体重；10＜体重≤16时为正常；16＜体重≤19时为超重；体重＞19时为肥胖。

按照以上逻辑，参考代码如下：

close all
use 体重标准表 alias t1 in 0
select 0
use 体测结果表 alias t2
scan
    cMont = allt(月龄)
    nWeight = val(体重)
    select t1
    locate for allt(月龄)==cMont
    if found()
        do case
        case nWeight <= val(低体重)
            cRet = '低体重'
        case nWeight <= val(正常)
            cRet = '正常'
        case nWeight <= val(超重)
            cRet = '超重'
        otherwise
            cRet = '肥胖'
        endcase
        replace 评价 with cRet in t2
    endif
endscan
go top
browse

老师，还想请教您个问题？
这里面还有个性别的条件
就是在体重标准表.dbf里，
性别：女
　　　　身高　　　　　　　　体　　　　　重
　　　　　　　　　　　低体重　　　正常　　　超重　　肥胖
　　　　103.5　　　100　　　110　　　　120　　　130　　　150
　　　　104.0　　　110　　　120　　　　130　　　150　　　170
性别：男
　　　　身高　　　　　　　　体　　　　　重
　　　　　　　　　　　低体重　　　正常　　　超重　　肥胖
　　　　103.5　　　100　　　110　　　　120　　　130　　　150
　　　　104.0　　　110　　　120　　　　130　　　150　　　170
在检测结果表里输入性别女或男，出现的结果是不一样的，请问怎么编写？是不是在体重标准表里添加上一个性别字段？
再在以下代码中如何添加区分性别的代码呢？
close all
use 体重标准表 alias t1 in 0
select 0
use 体测结果表 alias t2
scan
    cMont = allt(月龄)
    nWeight = val(体重)
    select t1
    locate for allt(月龄)==cMont
    if found()
        do case
        case nWeight <= val(低体重)
            cRet = '低体重'
        case nWeight <= val(正常)
            cRet = '正常'
        case nWeight <= val(超重)
            cRet = '超重'
        otherwise
            cRet = '肥胖'
        endcase
        replace 评价 with cRet in t2
    endif
endscan
go top
browse

你说的对。在“体重标准表.dbf”中增加一个“性别”字段，代码修改如下：

lose all
use 体重标准表 alias t1 in 0
select 0
use 体测结果表 alias t2
scan
    cMont = allt(月龄)
    nWeight = val(体重)
*-----------------------------------
    cSex = allt(性别)
    select t1
    locate for allt(月龄)==cMont and allt(性别)==cSex
*-----------------------------------
    if found()
        do case
        case nWeight <= val(低体重)
            cRet = '低体重'
        case nWeight <= val(正常)
            cRet = '正常'
        case nWeight <= val(超重)
            cRet = '超重'
        otherwise
            cRet = '肥胖'
        endcase
        replace 评价 with cRet in t2
    endif
endscan
go top
browse