问题
填空题
在窗体上画一个命令按钮Command1和一个文本框Text1，然后编写如下代码：
Private Sub Command1_Click()
x=Val(Text1.Text)
Select Case x
Case 1，3
y=x*x
Case Is＞=10，Is＜=-10
y=x
Case -10 To 10
y=-x
End Select
End Sub
程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。
答案
参考答案：I
解析： 本题考查SELECT CASE多分支语句。其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行。如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕退出Case结构。本题中x的值为3，符合第一个Case条件，所以执行y=x*x后值为9，然后退出。