Office中国论坛/Access中国论坛

标题: [已解决]根据二个字段值求出另一字段值这么个函数如何编写呢? [打印本页]

作者: shanghua1978 时间: 2007-12-31 11:21
标题: [已解决]根据二个字段值求出另一字段值这么个函数如何编写呢?
表1
编号  A    B    C    D
1    10    8
2    20 18
3    15    0
4    7    0

自义函数可根据以下A,B字段值求出D值

   A          B             D
----------------------------------------------
   <=16       0             0
   >16          0             A-16
   >8          >8          A-B
   >8          4>=B<8 A-B-4
   >8          <4          A-B-8
   <8          <8          A-B

我知道可以根据A值求得C值,可以这么定义一函数,
Function bc(income As Single) As Single
Select Case income
Case 0 To 3.5
bc = 0
Case 4 To 6.5
bc = 0.5
Case 7 To 14.5
bc = 1
Case 15 To 24
bc = 2
End Select
End Function

但当涉及二个字段时不知如何写了  哪位高手知晓望赐教  [attach]27587[/attach]

[ 本帖最后由 cuxun 于 2008-1-2 12:30 编辑 ]

作者: shanghua1978 时间: 2008-1-2 12:28
又学会了一招,真是非常感谢大肚鸭版主帮偶解决了大问题哦
祝您老在新的一年里

作者: shanghua1978 时间: 2008-1-2 13:07

在ACCESS学识上你可是比偶大大滴老呢
这不又来新问题啦偶这B字段里有空值怎么处理呢
在查询表达式里可以用NZ()来处理,可是这里如何处理呀
D =FunSelectD(a,nz(b))
结果 A<>0
      B=空格
   D全为0了

作者: shanghua1978 时间: 2008-1-2 13:19
不对哦试了还提示# 错误

作者: shanghua1978 时间: 2008-1-2 13:22
对了哦我这是窗体引用的是查询表格是不是有影响

作者: shanghua1978 时间: 2008-1-2 13:48
奇怪了还是不行 ..

作者: shanghua1978 时间: 2008-1-2 13:50
是不是要再增加一个条件先把B空格转换为0
If b = 0 Then
......

作者: iamee 时间: 2008-1-2 22:53

原帖由 cuxun 于 2008-1-2 12:30 发表
我老,哈哈,我还以为我还年轻呢,互相帮助呀

哈，他是“祝您，老在新的一年里”

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)