[單項(xiàng)選擇題] 在窗體上畫(huà)一個(gè)命令按鈕和一個(gè)文本框，并將窗體的KeyPreview屬性設(shè)置為True，然后編寫(xiě)如下代碼： Dim SaveAll As Str
2021-07-20
[單項(xiàng)選擇題] 在窗體上畫(huà)一個(gè)命令按鈕和一個(gè)文本框，并將窗體的KeyPreview屬性設(shè)置為True，然后編寫(xiě)如下代碼：
Dim SaveAll As String
Private Sub Form_Load()
Show
Text1.Text=" "
Text1.SetFocus
End Sub
Private Sub Command1_Click()
Text1.Text = Ucase(SaveAll)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序運(yùn)行后，在鍵盤上輸入abcdefg，單擊命令按鈕，則文本框中顯示的內(nèi)容為
A．a(chǎn)bcdefg
B．不顯示任何信息
C．ABCDEFG
D．出錯(cuò)
正確答案：C解析：[分析]： 將窗體的KeyPreview屬性設(shè)置為True，在鍵盤上輸入abcdefg時(shí)，觸發(fā)Form_KeyPross事件，變量SaveAll的值為“abcdefg”。由于 SaveAll為過(guò)程變量，單擊命令按鈕后，UCase函數(shù)將SaveAll的內(nèi)容轉(zhuǎn)換成大寫(xiě)字符。選項(xiàng)C的答案是正確的。
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。