填空题

在窗体上画一个命令按钮，然后编写如下事件过程： 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
填空题
在执行KeyPress事件过程时，KeyASCII是所按键的 【8】 值。对于有上档字符和下档字符的键，当执行KeyDown事件过程时，KeyCode是 【9】 字符的ASCII值。
相关试题