填空题

在窗体上画1个命令按钮(名称为Command1)和1个文本框(名称为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的值变为______。

【参考答案】

[答案] 9
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim arr(1 T0 100)As IntegerFor i=1 To 100arr(i)=Int(Rnd*______)Next iMax=arr(1) Min=arr(1) For i=1 To 100If ______ThenMax=arr(i)End IfIf ______ThenMin=arr(i)End IfNext iMsgBox MaxMsgBox MinEnd Sub程序运行后，单击命令按钮，将产生100个1000以内的随机整数，放入数组arr中，然后查找并先后使用消息框输出这100个数中的最大值Max和最小值Min，请将程序补充完整。
填空题
在窗体上添加一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Sum =0For i=3 T0 7Sum =i+2Next iMsgBox sum+iEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是______。
相关试题