選擇案例中的比較結構

Question

我不使用select case，但認爲它適合於此功能。如何做第二個和第三個案例的比較？編譯器不喜歡那個代碼。在Select Case中不可能以這種方式進行比較？

Private Shared Function TakeValue(ByVal interval As Integer) As Integer 
    Select Case interval 
     Case Is <= 15 
      Return 1440 
      ***Case Is > 15 And <=30 
      Return 720 
      Case is > 30 And <=60 
      Return 528*** 
     Case Else 
      Return 400 

    End Select 
End Function 

Answer 1

也許是這樣的：

Select Case interval 
    Case 0 To 15 
    Return 1440 
    Case 16 To 30 
    Return 720 
    Case 31 To 60 
    Return 528 
    Case Else 
    Return 400 
End Select 

參考文獻：

• Select Case Statements