[填空題] 假定有如下程序代碼，程序運(yùn)行后，把鼠標(biāo)光標(biāo)移到窗體內(nèi)，每單擊一次，變換一種鼠標(biāo)光標(biāo)的形狀，依次顯示鼠標(biāo)光標(biāo)的15個(gè)屬性。請?jiān)趧澗€處將程序補(bǔ)充完整。
2021-07-20
[填空題] 假定有如下程序代碼，程序運(yùn)行后，把鼠標(biāo)光標(biāo)移到窗體內(nèi)，每單擊一次，變換一種鼠標(biāo)光標(biāo)的形狀，依次顯示鼠標(biāo)光標(biāo)的15個(gè)屬性。請?jiān)趧澗€處將程序補(bǔ)充完整。
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
正確答案：MousePointer
參考解析：[評析] MousePointer屬性可以通過代碼設(shè)置，也可以通過屬性窗口設(shè)置，在程序代碼中設(shè)置MousePoimer屬性的一般格式為： 對象.MousePointer=設(shè)置值 由于程序中使用Static關(guān)鍵字定義變量x，每次單擊窗體時(shí)x的值增加1，并且下次單擊窗體時(shí)，x能保留上次的值，這樣就能保證每次單擊窗體時(shí)看到到鼠標(biāo)光標(biāo)都和上一次看到的不一樣。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。