在VFP 6.0中
发布网友
发布时间：2022-04-23 10:06
共2个回答
热心网友
时间：2023-10-10 19:47
use course3
enMaximum = 0 && 初始化英语学院最大值
enMinimum = 1000 && 初始化英语学院最小值
enAverage=0 && 初始化英语学院统计数
enHours=0 && 初始化英语学院学时总数
arMaximum = 0 && 初始化艺术学院最大值
arMinimum = 1000 && 初始化艺术学院最小值
arAverage=0 && 初始化艺术学院统计数
arHours=0 && 初始化艺术学院学时总数
SCAN
IF 开课学院="英语学院"
enAverage=enAverage+1
enHours=enHours+学时
enMinimum = MIN(enMinimum, 学时)
enMaximum = MAX(enMaximum, 学时)
ENDIF
IF 开课学院="艺术学院"
arAverage=arAverage+1
arHours=arHours+学时
arMinimum = MIN(arMinimum, 学时)
arMaximum = MAX(arMaximum, 学时)
ENDIF
ENDSCAN
英语学院平均数=enhours/enaverage
艺术学院平均数=arhours/araverage
b1= '英语学院最小值: '+STR(enMinimum,3) +' 英语学院最大值: '+STR(enMaximum,3) +' 英语学院平均值:'+STR(英语学院平均数,4)+' 艺术学院最小值: '+STR(arMinimum,3)+' 艺术学院最大值: '+STR(arMaximum,3) + ' 艺术学院平均值：'+STR(艺术学院平均数,4)
?b1
热心网友
时间：2023-10-10 19:47
to后面不能用内存变量，而要用数组，因为该命令得到的不是一个值而是3个。
use course3
calculate max(学时),min(学时),avg(学时) for 开课学院="英语学院" .or. 开课学院="艺术学院" to array b(3)
list memory like b* &&要显示数据所指的项目的话这句改为以下
b="最大学时"+str(b(1))+"最小学时"+str(b(2))+"平均学时"+str(b(3))
如果英语学院和艺术学院的要分开计算，把calculate子句的for….or.… 分两次表达
