下面 的程序用于根据文本框 X 中输入的内容进行以下处理:若 X 为 2 、 4 、 6 ,则打印 "X 的值为 2 、 4 、 6" ;若 X 在 11 到 15 之间,则打印 "X 的值为大于等于 11 小于等于 15" ;若 X 大于 20 ,则打印 "X 的值大于 20" ;否则,打印 "X 不在范围内 " 。 Private Sub Command1_Click() Select Case Val(X.Text) Case [ ] Print "X 的值为 2,4,6" Case [ ] Print "X 的值为大于等于 11 小于等于 15" Case Is >20 Print "X 的值大于 20" Case Else Print "X 不在范围内 " End Select End Sub