呼叫号码项目Visual Basic

Question

1） 创建一个 Windows 窗体应用程序"CallNumber"。
2） 设计和定义 GUI，通过包含名称中的控件类型。例如--- CallNumberTextBox。修改其他属性（如果需要）。
3） 通过双精度创建和定义 GetLocation button_click事件处理程序方法单击设计视图中的获取位置按钮。执行以下任务在此事件处理程序方法中：
一个。声明呼叫号码的变量，该变量应为整数。
b.从文本框中获取输入数据（书籍的呼叫号码）并将其保存在在上一步中声明的呼叫号码变量。假设用户将始终输入数字整数。
c.定义选择语句以确定和显示书籍的位置。

这是我到目前为止的代码。我没有得到输出。你可以帮我吗？

    Dim call_num As Integer = Val(CallNumberTextBox.Text) 'get call number
    Dim CallNumberResultLabel As String
    Select Case call_num
        Case 100 To 199 And " 901 to 1000"
            CallNumberResultLabel = "Building A"
        Case 200 To 349
            CallNumberResultLabel = "Building B"
        Case 401 To 599
            CallNumberResultLabel = "Building B"
        Case 600 To 899
            CallNumberResultLabel = "Building C"
        Case Is < 1000
            CallNumberResultLabel = "Building C"
        Case 350 To 400
            CallNumberResultLabel = "Building D"
        Case Else
            CallNumberResultLabel = "Error"
    End Select
    CallNumberTextBox.Focus()
End Sub

Answer 1

将Case 100 To 199 And " 901 to 1000"更改为Case 100 To 199, 901 To 1000