Visual Basic 6.0案例声明

Question

这段小代码应该启动并给我正确的变量,但无论变量"numericDay"中的是什么,变量"后缀"给我"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

根据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" 将按字节或2和22（对应于22）执行。