填空题
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Dim a(1 To 10)
Dim p(l 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 = I To 3
k = k + p(i)* 2
Next i
Print k
End Sub
程序运行后,单击命令按钮,输出结果是
【13】
。
【参考答案】
33
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。 Private Sub Form_Click( ) Static x As Integer Cls Print Mousepointer Property is now ; x Forml. 【12】 =x x=-x+1 If x = 15 Then x = 0 End Sub
点击查看答案&解析
填空题
在执行KeyPress事件过程时,KeyASCII是所按键的 【8】 值。对于有上档字符和下档字符的键,当执行KeyDown事件过程时,KeyCode是 【9】 字符的ASCII值。
点击查看答案&解析
相关试题
假定建立了一个工程,该工程包括两个窗体,...
文件的打开和关闭语句分别是 【10】 和...