题目内容
(请给出正确答案)
[主观题]
PrivateSubForm_Click()DimA(1To3)AsStringDimcAsIntegerDimjAsIntegerA(1)="4"A(2)
PrivateSubForm_Click()DimA(1To3)AsStringDimcAsIntegerDimjAsIntegerA(1)="4"A(2)
PrivateSubForm_Click()
DimA(1To3)AsString
DimcAsInteger
DimjAsInteger
A(1)="4"
A(2)="8"
A(3)="12"
c=1
Forj=1To3
c=c+Val(A(j))
Nextj
Printc
EndSub
写出程序运行时单击窗体后,窗体Form1上的结果。
查看答案
如果结果不匹配,请 联系老师 获取答案