[求助]积分转换 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

请教：

如何根据日均余额通过积分规则自动得到积分，换取规则如下：

3万以下50分，5万-10万100分，10万-20万150分，20-30万180分
30-40万220分，40-50万280分，50-80万300分，80-100万350分。

不需要手工填入300分。

此主题相关图片如下：储蓄换积分.jpg

Case语句还可以是一个范围，起始值和终止值用关键词To隔开，例如：

Dim Mark As Integer = 65
Dim Result As String
Select Case Mark
    Case 0 To 40
        Result = "E"
    Case 41 To 60
        Result = "D"
    Case 61 To 70
        Result = "C"
    Case 71 To 90
        Result = "B"
    Case 91 To 100
        Result = "A"
End Select

类似这样的，但是在我这里怎么写？

下载信息 [文件大小：下载次数： ]
点击浏览该文件:积分礼品.table

[此贴子已经被作者于2014-3-25 21:33:59编辑过]

主题：[求助]积分转换