单选题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )
Dim x As Integer, y As Integer
Dim s As String
s = "2013-2014"
x = Int(Rnd(1)) + 100
y = Val(Left(s, 3))
Select Case x + y
Case Is ＞ 301
Print "分支1"
Case 300 To 301
Print "分支2"
Case Is ＜ 301
Print "分支3"
End Select
End Sub
程序运行时，单击Command1，则在窗体上输出的结果是______。
【正确答案】
B
【答案解析】[解析] Rnd英文全称Random，意随机数，Rnd * 100生成一个取值在[0，100)之间的随机数(注意不包含100)。取整函数Int(x)，英文全称：Integer，返回值为不大于自变量x的最大整数，Int(Rnd(1)) =0，x=100。类型转换函数Val(s)，返回值为字符串表达式s中所包含的数值，若遇到字母(指数符号除外)则终止转换。字符串截取函数Left$(s，n)，截取字符串s左边的n个字符。Left(s，3) =201，Val(s) =val(201) =201。x+y=100+201=301；满足300 To 301，故最后输出的结果是分支2，本题正确选项为B。