Vb6 Visual Basic 6.0案例说明

这段小代码应该会启动并给我正确的变量 但无论变量“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

---

您的选择不正确。请尝试以下操作：

    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

作为将来的参考：

根据您应该这样写：

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

---

“2”或“22”

将以字节方式或与2和22进行运算，2和22对应于22。

您的选择写错了。请尝试以下操作

根据输入的数字显示日期

public function day_display(day as Integer) as String
   select case day
        case 1: day_display = "Sunday"
        case 2: day_display = "Monday"
        case 3: day_display = "Tuesday"
        case 4: day_display = "Wednesday"
        case 5: day_display = "Thursday"
        case 6: day_display = "Friday"
        case 7: day_display = "Saturday"
        case else: day_display = "Wrong entry."
   end select
end function   

---

day_display（1）将返回“Sunday”

@Slaks它们都是字符串变量。我以为我键入了这些，但我认为我的原始问题已缩减到了大小。不管怎样，也不用担心，我已经看到了语法中的错误，这要感谢nybbler的回答。+1作为将来的参考，您也可以尝试一下手册