15、执行下面的程序,消息框的输出结果是______.Option Base 1 Private Sub Command
来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/11/11 20:06:43
15、执行下面的程序,消息框的输出结果是______.Option Base 1 Private Sub Command1_Click() Dim a(10)
15、执行下面的程序,消息框的输出结果是______.
Option Base 1
Private Sub Command1_Click()
Dim a(10),p(3) As Integer
k=5
For i=1 To 10
a(i)=i
Next i
For i=1 To 3
p(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
MsgBox k
End Sub
要求有解释.不要只给答案.
15、执行下面的程序,消息框的输出结果是______.
Option Base 1
Private Sub Command1_Click()
Dim a(10),p(3) As Integer
k=5
For i=1 To 10
a(i)=i
Next i
For i=1 To 3
p(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
MsgBox k
End Sub
要求有解释.不要只给答案.
33
a(i)=i:
so
a(1)=1,a(2)=2,...,a(10)=10;
p(i)=a(i*i):
so
p(1)=a(1)=1;
p(2)=a(2*2)=a(4)=4;
p(3)=a(3*3)=a(9)=9;
k=5;
k=k+p(i)*2;
k=5+p(1)*2=5+2=7;
k=7+p(2)*2=7+8=15;
k=15+p(3)*2=15+18=33;
so
k=33.
result:k=33.
a(i)=i:
so
a(1)=1,a(2)=2,...,a(10)=10;
p(i)=a(i*i):
so
p(1)=a(1)=1;
p(2)=a(2*2)=a(4)=4;
p(3)=a(3*3)=a(9)=9;
k=5;
k=k+p(i)*2;
k=5+p(1)*2=5+2=7;
k=7+p(2)*2=7+8=15;
k=15+p(3)*2=15+18=33;
so
k=33.
result:k=33.
15、执行下面的程序,消息框的输出结果是______.Option Base 1 Private Sub Command
access下面程序运行后输出的是 Private Sub Form_Click() For i=1 To 4 x=1
VB程序问题Option Explicit'这是老师给的答案:Private Sub Form_Click()Dim y
VB编程option base 1private sub command1_click() dim d d=array(
计算机执行下面的程序段后,输出的结果是( )
执行下面的程序,从键盘上输入3和4,则输出结果是
若执行下面的程序时,从键盘上输入5和2,则输出结果是
执行下列程序段后的输出结果是
下面程序运行后的输出结果是
下面程序的输出结果是什么?
执行下列程序的输出结果是___(小数点后只定1位).
(2014•四川模拟)执行如图所示的程序框图,则输出的结果是=______.