编写如下两个事件过程：

PrivateSubForm_KeyDown（KeyCodeAsInteger,ShiftAsInteger）

PrintChr（KeyCode）

EndSubPrivate

SubForm_KeyPress（KeyAsciiAsInteger）

PrintChr（KeyAscii）

EndSub

一般情况下（即不按住Shift和锁定大写）运行程序，如按“A”键则输出（）

A:Aa

B:aA

C:AA

D:aa

参考答案：Aa