阅读以下程序,完成后面的题目:Private Sub Command1_Click() Dim N As Integer Dim S As Integer N = val(Text1.Text) S = 0 For i = 1 To N S = S + i * (i + 1) Next i Text2.Text = str(S)End Sub
(1)
当程序运行时,在Text1文本框中输入4,单击按钮command1,结果在Text2输出。
(2)
在text1中输入10000,程序会出现什么错误?。(选填:要求对象/下标越界/无效的调用过程/溢出)
答案: 【1】40
【1】溢出