Public Function F(A As Variant, D As Variant)
On Error GoTo ERR_F
F = A - DLookup("[工序代码]", "表1", "[id]=" & D - 1)
If F <= 0 Or IsNull(F) Then
F = 0
End If
EXIT_F:
Exit Function
ERR_F:
F = 0
End Function作者: msf 时间: 2006-3-5 20:22
SELECT 表1.产品名称, 表1.工序名称, 表1.工序代码, 表1.id, f([工序代码],[id]) AS 表达式1
FROM 表1;作者: fan0217 时间: 2006-3-6 17:08
在论坛上有很多关于求余额的方法,可以搜索一下。作者: dhqian 时间: 2006-3-10 00:55
多谢msf!