[填空題] 假定有如下程序代碼,程序運行后,把鼠標光標移到窗體內(nèi),每單擊一次,變換一種鼠標光標的形狀,依次顯示鼠標光標的15個屬性。請在劃線處將程序補充完整。
2021-07-20
[填空題] 假定有如下程序代碼,程序運行后,把鼠標光標移到窗體內(nèi),每單擊一次,變換一種鼠標光標的形狀,依次顯示鼠標光標的15個屬性。請在劃線處將程序補充完整。 Private Sub Form_Click() Static x As Integer Cls Print "Mousepointer Property is now"; x Form1. 【12】 =x x=x+1 If x=15 Then x=0 End Sub
正確答案:MousePointer
參考解析:[評析] MousePointer屬性可以通過代碼設(shè)置,也可以通過屬性窗口設(shè)置,在程序代碼中設(shè)置MousePointer屬性的一般格式為: 對象.MousePointer=設(shè)置值 由于程序中使用Static關(guān)鍵字定義變量x,每次單擊窗體時x的值增加1,并且下次單擊窗體時,x能保留上次的值,這樣就能保證每次單擊窗體時看到到鼠標光標都和上一次看到的不一樣。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。