如何编辑这样的公式？

[在途中]

在使用水晶报表时需要以下的公式，如何编辑呢？

数据库里有一成绩记录，如：成绩1，成绩2，成绩3，想求出平均分？

现在个人不知如何在水晶报表里使用Average ()这种函数，自已想编成
平均分＝（成绩1＋成绩2＋成绩3）/3，但又遇到有时某个成绩可能不存
在的情况，所以要确定要除以几，是3还是2，我便这样写了（basic语法)

dim i as number
dim j as number

i=0

if {成绩数据.成绩1}>0 then i=i+1
if {成绩数据.成绩2}>0 then i=i+1
if {成绩数据.成绩3}>0 then i=i+1

j=({成绩数据.成绩1}+{成绩数据.成绩2}+{成绩数据.成绩3})/i

select case j
case is >=85
formula="优"
case is >=75
formula="良"
case is >=60
formula="及格"
case is>=0
formula="待及格"
end select

可这时要是我的数据库里其中一成绩没有记录，也就是是空时便无法求出
正确答案？

该如何办呢？

[在途中]

这很难吗？

[xwdd129]

类似以下公式：

if IsNull ({成绩数据.成绩1}) then {成绩数据.成绩2} else ({成绩数据.成绩1}+ {成绩数据.成绩2}) / 2

[在途中]

还不行

[zhang_jeremy]

先把三个成绩做为空时候的零处理，分别放在三个公式字段里面，然后再对三个公式字段做你上面的处理就行了。

[阿泰]

select case j
case is>=0
formula="待及格"
case else
formula="没有成绩记录"
end select