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