MS Access 2010 模块案例声明

Posted 2023-05-07

【中文标题】MS Access 2010 模块案例声明

【英文标题】：MS Access 2010 Module Case Statement

【发布时间】：2017-07-13 14:10:18

【问题描述】：

我正在尝试在 MS Access 2010 中为生日 = 5/5/1958 执行以下功能，并获得“未知”而不是“狗”的返回值。对这个 CASE 语句有帮助吗？

Public Function whichChineseZodiacSign(Birthday As Date)

Select Case whichChineseZodiacSign
Case #2/18/1958# To #2/7/1959#
    whichChineseZodiacSign = "Dog"

Case Else
    whichChineseZodiacSign = "Unknown"
End Select
End Function

谢谢！

【参考方案1】：

试试这个：

Option Explicit

Public Function whichChineseZodiacSign(Birthday As Date) As String

    Select Case Birthday
    Case #2/18/1958# To #2/7/1959#
        whichChineseZodiacSign = "Dog"
    Case Else
        whichChineseZodiacSign = "Unknown"
    End Select

End Function

在您的情况下，您在Select Case 中有错误条件。