填空题

在窗体上画一个命令按钮，然后编写如下事件过程: Private Sub Command1_ Click( ) Dim a(1 To 10) Dim p(1 To 3) 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 Print k End Sub 程序运行后，单击命令按钮，输出结果是 【13】 。

【参考答案】

33
<上一题 目录 下一题>
热门 试题

填空题
假定有如下程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次显示鼠标光标的15个属性。请在划线处将程序补充完整。Private Sub Form_ Click( )Static x As IntegerClsPrint Mousepointer Property is now ; xForm1. 【12】 =xx=x+1If x = 15 Then x = 0End Sub
填空题
文件的打开和关闭语句分别是 【10】 和 【11】 。
相关试题