[單項(xiàng)選擇題] 把窗體的KeyPreview屬性設(shè)置為T(mén)rue，然后編寫(xiě)如下事件過(guò)程：

Private Sub Form_KeyPress(KeyAscii As Integer)

Dim ch As String

ch=Chr(KeyAscii)

KeyAscii=Ase(UCase(ch))

Print Chr(KeyAscii+2)

End Sub

程序運(yùn)行后，按鍵盤(pán)上的“A”鍵，則在窗體上顯示的內(nèi)容是( )

A．A

B．B

C．C

D．D

C

本題考查了3個(gè)系統(tǒng)函數(shù)：Chr()，Asc()，UCase()。它們的功能分別是將ASCII碼值轉(zhuǎn)換為字符；將字符轉(zhuǎn)化為Ascii碼值；將字符轉(zhuǎn)化為大寫(xiě)字符串。KeyPreview屬性返回或設(shè)置一個(gè)值，以決定是否在控件的鍵盤(pán)事件之前激活窗體的鍵盤(pán)事件。鍵盤(pán)事件有KeyDown、KeyUp和KeyPress，主要應(yīng)用于Form對(duì)象。本題的程序執(zhí)行時(shí)，當(dāng)按下“A”時(shí)，則“A”的Ascii碼值傳給函數(shù)體，并轉(zhuǎn)換為字符賦給變量ch，再將ch(即“A”)的Ascii值賦值給KeyAscii，最后將KeyAscii值加2并轉(zhuǎn)化為字符打印輸出，即結(jié)果為字母“C”。