[填空題] 在窗體上畫(huà)一個(gè)標(biāo)簽(名稱(chēng)為L(zhǎng)abel1)和一個(gè)計(jì)時(shí)器(名稱(chēng)為T(mén)imer1),如圖16-11所示,然后編寫(xiě)如下幾個(gè)事件過(guò)程: Private S
[填空題] 在窗體上畫(huà)一個(gè)標(biāo)簽(名稱(chēng)為L(zhǎng)abel1)和一個(gè)計(jì)時(shí)器(名稱(chēng)為T(mén)imer1),如圖16-11所示,然后編寫(xiě)如下幾個(gè)事件過(guò)程:
Private Sub Form_Load()
Timer1. Enabled=False
Timer1. Interval= 【8】
End Sub
Private Sub Form_Cliek()
Timer1. Enabled= 【9】
End Sub
Private Sub Timer1_Timer()
Label1. Caption= 【10】
End Sub
程序運(yùn)行后,單擊窗體,將在標(biāo)簽中顯示當(dāng)前時(shí)間,每隔1秒鐘改變一次。請(qǐng)?zhí)羁铡?/p>正確答案:
[8]1000 [9]True或任何非0數(shù)值 [10]Time或Time$解析:[分析]: 根據(jù)題意:將Interval屬性為1 000毫秒;在單擊窗體后,為了能使計(jì)數(shù)器有效,應(yīng)該將Enabled設(shè)置為T(mén)rue或任何非0數(shù)值。Time函數(shù)來(lái)顯示系統(tǒng)時(shí)間,此函數(shù)返回一個(gè)Varianr,以日期/時(shí)間數(shù)值(VarType 7)的形式包含當(dāng)前時(shí)間。將它賦予某個(gè)字符串變量或?qū)傩詴r(shí),比如賦予本題中Label1標(biāo)簽的Caption屬性時(shí),Visual Basic將用“控制面板”中指定的格式將其轉(zhuǎn)換成一個(gè)字符串。
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢(xún)相關(guān)領(lǐng)域?qū)I(yè)人士。