[填空題] 在窗體上畫一個(gè)文本框和一個(gè)命令按鈕,如下圖所示。 編寫如下程序: Private Sub Form_Load()ShowText1.Tex
[填空題] 在窗體上畫一個(gè)文本框和一個(gè)命令按鈕,如下圖所示。
編寫如下程序:
Private Sub Form_Load()
Show
Text1.Text=" "
Form1.KeyPreview=False
Text1.SetFocus
End Sub
Private Sub Command1_Click()
KeyPreview=Not KeyPreview
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print UCase(Chr(KeyAscii+1));
End Sub
Private sub Text1_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii+2)
KeyAscii=0
End Sub
閱讀以上程序,理解每個(gè)事件過(guò)程的操作,然后填空。
①程序運(yùn)行后,直接從鍵盤上輸入abc,程序輸出的結(jié)果是 【9】 。
②程序運(yùn)行后,單擊一次“命令按鈕1”,然后從鍵盤上輸入abc,程序輸出的結(jié)果是 【10】 。
正確答案:[9]cde [10]BCD解析:[分析]: 本題主要用來(lái)加深理解窗體的 KeyPreview屬性。在默認(rèn)情況下,控件的鍵盤事件優(yōu)先于窗體的鍵盤事件,因此在發(fā)生鍵盤事件時(shí),總是先觸發(fā)控件的鍵盤事件。如果希望窗體先接收鍵盤事件,則必須將窗體的KcyPreview屬性設(shè)置為True,否則不能觸發(fā)窗體的鍵盤事件。在上面的程序中,“命令按鈕1”的事件過(guò)程用來(lái)對(duì)窗體的KeyPreview屬性值進(jìn)行切換,每單擊一次該按鈕,KeyPreview屬性改變一次值,即從 True變?yōu)镕alse或從False變?yōu)門rue。當(dāng)
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。