Question

VFP数据库问题

1、从键盘输入一组数据，分别统计正负数的个数，输入“0”时程序结束。
2、编写程序设置口令为“COMPUTER”，允许输入三次，如正确，显示“欢迎使用”；如错误，显示“错误，请重新输入”；若三次输入都不正确，显示“非法用户！”。
3、统计进货数量在X以上的商品并显示出来。（例如输入15，则可以统计进货数量大于等于15的商品总数，并可以显示商品信息）
4、编写程序实现按销售员姓名查询其销售业绩。（输入销售员姓名，输出其销售商品的总金额）
5、编写程序实现查询某商品的销售情况。(输入商品名称，输出该商品的销售量，销售单价，销售日期和销售员，并可统计销售利润)

THX

Answer 1

1、
clear
a=0
b=0
k=1
do while k<>0
input "请输入一个数：" to k
if k>0
a=a+1
endif
if k<0
b=b+1
endif
enddo
?"有正数：",a
?"有负数：",b
2、
clear
for i=1 to 3
accept "请输入密码：" to mm
if mm=="COMPUTER"
?"欢迎使用"
exit
endif
?"错误，请重新输入"
endfor
if i=4
?"非法用户！"
endif
3、
clear
input "请输入进货数量：" to s
use 商品表
list for 进货数量>=s
count for 进货数量>=s to x
?"共有"+alltrim(str(x))+"种商品的进货数量高于"+alltrim(str(s))
use
4、
clear
accept "请输入姓名：" to xm
use 商品表
loca for 姓名=xm
if found()
?总金额
else
?"查无此人！"
endif
use
5、
clear
accept "请输入商品名称：" to mc
sele 销售量,销售单价,销售日期,销售员,销售量*销售单价 as 销售利润 from 销售表 where 商品名称=mc

Answer 2

太大了吧 简直就是作业啊。

可以帮助解决困难 ，不帮助做作业。