Office中国论坛/Access中国论坛

标题: 数值判断的问题？ [打印本页]

作者: XWQ2000 时间: 2006-6-21 19:04
标题: 数值判断的问题？

检验批量

抽取样本量

1～10

Ｎ

11～50

10

51～99

13

100～500

50

501～3200

80

根据上表当我在窗体中输入相应的检验批量时同时得出抽取样本量，请问这段代码任何写？

谢谢

作者: andymark 时间: 2006-6-21 19:42

select case 检验批量

case 1 to 10

抽取样本=N

case 11 to 50

抽取样本=10

case 51 to 99

抽取样本=13

case 100 to 500

抽取样本=50

case 501 to 3200

抽取样本=80

end select

作者: XWQ2000 时间: 2006-6-25 18:08
谢谢

我是用

If Me.批量 < 51 And Me.批量 > 11 Or Me.批量 = 11 Then
Me.样本量 = 10
End If

If Me.批量 < 100 And Me.批量 > 51 Or Me.批量 = 51 Then
Me.样本量 = 13
End If

If Me.批量 < 501 And Me.批量 > 99 Then
Me.样本量 = 50
End If
End Sub

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