Visual Basic 6.0ケースステートメント

Question

この小さなコードは、正確な変数 を提供しますが、変数 "numericDay"に何があっても、変数 "suffix"は私に "th"を与えます。両方の文字列変数ですnumericDay」の値が 変更したとき、私はそれが変化しない理由は見当たらないあなたは間違ってあなたの選択を書いた

Select Case numericDay 
      Case numericDay = "1" Or "21" Or "31" 
       suffix = "st" 
      Case numericDay = "2" Or "22" 
       suffix = "nd" 
      Case numericDay = "3" Or "23" 
       suffix = "rd" 
      Case Else 
      suffix = "th" 

    End Select 

Answer 1

試してみてください。。

Select Case numericDay 
      Case "1", "21", "31" 
       suffix = "st" 
      Case "2", "22" 
       suffix = "nd" 
      Case "3", "23" 
       suffix = "rd" 
      Case Else 
       suffix = "th" 
    End Select 

今後の参考のために：http://www.vb6.us/tutorials/learn-if-else-and-select-statements-vb6

Answer 2

the msdnによると、あなたはこのようにそれを書かれている必要があります。

Select Case numericDay 
     Case "1", "21", "31" 
      suffix = "st" 
     Case "2", "22" 
      suffix = "nd" 
     Case "3", "23" 
      suffix = "rd" 
     Case Else 
     suffix = "th" 
End Select 

Answer 3

"2" Or "22"は、バイト単位で、または22と22で対応します。