Déclaration de cas du module MS Access 2010

Question

J'essaye d'exécuter la fonction suivante dans MS Access 2010 pour Birthday = 5/5/1958 et obtenir une valeur de retour de "unknown" au lieu de "Dog". Toute aide sur cette déclaration 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 

Merci!

Answer 1

Essayez ceci:

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 

Dans votre cas, vous aviez condition fausse dans le Select Case.