在窗体上面有一个文本框，其名称为Text1，编写如下事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dims str As String
str=Chr(KeyAscii)
KeyAseii=Asc(UCase(str))
Text1.Text=String(2，KeyAscii)
End Sub
程序运行后，如果在键盘上输入字母“a”，则在文本框Text3中显示的内容为( )。

A．aaa

B．AAA

C．AA

D．aa

以演示账套“金华电子公司”为基础资料：

请为工资管理进行工资计算公式定义： 公式名称：办公室在职人员 出勤奖=基本工资×0.05 应发合计=基本工资+出勤奖 实发合计=应发合计-代扣所得税