if else语句的使用遇到的问题

小叶　发表于：2009-05-06 11:17:52 　

Option Compare Database

Private Sub 需求数量_AfterUpdate()

If 0 < Me.需求数量 < 100 Then
Forms!frmtzwlcz_child_Add!损耗率 = 0.05

ElseIf 101 < Me.需求数量 < 300 Then
Forms!frmtzwlcz_child_Add!损耗率 = 0.03

ElseIf 301 < Me.需求数量 < 500 Then
Forms!frmtzwlcz_child_Add!损耗率 = 0.03

ElseIf 501 < Me.需求数量 < 5000 Then
Forms!frmtzwlcz_child_Add!损耗率 = 0.02

ElseIf 5001 < Me.需求数量 < 15000 Then
Forms!frmtzwlcz_child_Add!损耗率 = 0.01

Else
Forms!frmtzwlcz_child_Add!损耗率 = 0.005
End If

End Sub

不知道怎么搞的。计算损耗率总是等于0。05

竹笛发表于：2009-05-06 12:03:12

Private Sub 需求数量_AfterUpdate()
'假定需求数量为整数
    If Me.需求数量 < 100 And Me.需求数量 > 0 Then
        Forms!frmtzwlcz_child_Add!损耗率 = 0.05
    End If

If Me.需求数量 < 300 And Me.需求数量 > 99 Then
Forms!frmtzwlcz_child_Add!损耗率 = 0.03

    End If
    If Me.需求数量 < 500 And Me.需求数量 > 299 Then
        Forms!frmtzwlcz_child_Add!损耗率 = 0.03

    End If
    If Me.需求数量 < 5000 And Me.需求数量 > 499 Then
        Forms!frmtzwlcz_child_Add!损耗率 = 0.02

    End If
    If Me.需求数量 < 1500 And Me.需求数量 > 4999 Then
        Forms!frmtzwlcz_child_Add!损耗率 = 0.01

    End If
    If Me.需求数量 < 0 Then
        Forms!frmtzwlcz_child_Add!损耗率 = 0.005
    End If

End Sub

总记录：1篇页次：1/1 9 1 :

Access交流中心