![[填空题] 假定有如下程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次显示鼠标光标的15个属性。请在划线处将程序补充完整。Private Sub Form_Cl,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E5%81%87%E5%AE%9A%E6%9C%89%E5%A6%82%E4%B8%8B%E7%A8%8B%E5%BA%8F%E4%BB%A3%E7%A0%81%EF%BC%8C%E7%A8%8B%E5%BA%8F%E8%BF%90%E8%A1%8C%E5%90%8E%EF%BC%8C%E6%8A%8A%E9%BC%A0%E6%A0%87%E5%85%89%E6%A0%87%E7%A7%BB%E5%88%B0%E7%AA%97%E4%BD%93%E5%86%85%EF%BC%8C%E6%AF%8F%E5%8D%95%E5%87%BB%E4%B8%80%E6%AC%A1%EF%BC%8C%E5%8F%98%E6%8D%A2%E4%B8%80%E7%A7%8D%E9%BC%A0%E6%A0%87%E5%85%89%E6%A0%87%E7%9A%84%E5%BD%A2%E7%8A%B6%EF%BC%8C%E4%BE%9D%E6%AC%A1%E6%98%BE%E7%A4%BA%E9%BC%A0%E6%A0%87%E5%85%89%E6%A0%87%E7%9A%8415%E4%B8%AA%E5%B1%9E%E6%80%A7%E3%80%82%E8%AF%B7%E5%9C%A8%E5%88%92%E7%BA%BF%E5%A4%84%E5%B0%86%E7%A8%8B%E5%BA%8F%E8%A1%A5%E5%85%85%E5%AE%8C%E6%95%B4%E3%80%82Private+Sub+Form_Cl.png "[填空题] 假定有如下程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次显示鼠标光标的15个属性。请在划线处将程序补充完整。Private Sub Form_Cl,第1张")
[填空题] 假定有如下程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次显示鼠标光标的15个属性。请在划线处将程序补充完整。
Private Sub Form_Click()
Static x As Integer
Cis
Print"Mousepointer Property is now:;X
Forml 【12】 =x
X=K+1
If x=15 Then x=0
End Sub
正确答案：MousePointer
参考解析：[评析] MousePointer属性可以通过代码设置，也可以通过属性窗口设置，在程序代码中设置MousePointer属性的一般格式为： 对象．MousePointer=设置值由于程序中使用Static关键字定义变量x，每次单击窗体时x的值增加1，并且下次单击宙体时，x能保留上次的值，这样就能保证每次单击窗体时看到到鼠标光标都和上一次看到的不一样。
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）