(17)在窗體上有一個文本框,其名稱為Text1,編寫下列事件過程: Private Sub Text1_KeyPress(KeyAsc
（17）在窗體上有一個文本框，其名稱為Text1，編寫下列事件過程： Private Sub Text1_KeyPress(KeyAscii As Integer ) Dim str As String Str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Test=String(2,KeyAscii) End Sub 程序運行后，如果在鍵盤上輸入字母“a”則在文本框Text3中顯示的內容為 A.aaa B.AAA C.AA D.aa
正確答案：B【解析】UCase(str)將str轉成大寫的字符串；String(n,character)返回n個重復的字符，如果character是ASCII碼，則返回其對應的字符。程序運行過程為：首先輸入字母“a”，并通過“str=Chr(KeyAscii)”語句將a的ASCII值轉換成字符串；然后通過“KeyAscii=Asc(UCase(str))”求得大寫A的ASCII值，并顯示在文本框中；最后通過“Text1.Text=String(2,KeyAscii)”語句為文本框輸入了兩個字母“A”，所以最后在文本
詞條內容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領域），建議您咨詢相關領域專業(yè)人士。