VB语言程序设计问题

来源：百度知道编辑：UC知道时间：2024/05/31 13:35:52

Option Basc 1
ptivate Sub Command1_Click()
Dim a(10) As Integer,p(3) As Integer
k=5
For i=1 TO 10
a(I)=1
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
End Sub
程序运行后，单击命令按钮，输出结果是33。
请问是为什么呢？最好是详尽的解释。
第一行Basc改为Base，第二行Ptivate改为Private
第6行改为 a(i)=i

已作修改。
＝＝＝＝＝＝＝＝＝＝＝
For i=1 TO 10
a(I)=i
Next i
这一段,a(1)~a(10)分别为1,2,..,10.
For i =1 To 3
p(i) = a(i*i)
Next i
这一段，p(1)=a(1)=1,p(2)=a(4)=4,p(3)=a(9)=9.
For i = 1 To 3
k = k + p(i) * 2
Next i
这一段，循环了3次，(1)k=5+1*2=7;(2)k=7+4*2=15;(3)k=15+9*2=33.

第6行改为 a(i)=i

pascal语言程序设计的问题 C语言程序设计问题 C语言程序设计的问题 C语言程序设计中的问题求助：C语言程序设计问题初学者C语言程序设计问题 C语言程序设计的相关问题关于c语言程序设计的问题关于C语言程序设计有问题关于C语言程序设计的问题