填空题
在窗体上画一个命令按钮,然后编写如下事件过程:
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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
文件的打开和关闭语句分别是 【10】 和 【11】 。
点击查看答案&解析
填空题
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。 Private Sub Form_Click() Static x As Integer Cls Print Mousepointer Property is now ;x Form1. 【12】 =x x=x+1 If x=15 Then x=0 End Sub
点击查看答案&解析
相关试题
假定建立了一个工程,该工程包括两个窗体,...