单选题 在窗体上画一个名称为Text1的文本框，然后编写如下事件过程：
Private Sub Form_Load()
Show
Text1.SetFocus
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim ch As String
ch=Chr(KeyAscii)
KeyAscii=Asc(UCase(ch))
Print Chr(KeyAscii+4);
End Sub
程序运行后，在文本框中输入abcde，则在窗体上显示的内容是