Dim S1As String.S2As String Private Sub Form_Load0 Text1.Text="" Text2.Text="" End Sub Private Sub Text1_KeyDown(KeyCodeAs Integer,ShiftAs Integer) S2=S2&Chr(KeyCode) End Sub Private Sub Text1_KeyPress(KeyAsciiAs Integer) S1=S1 &Chr(KeyAscii) End Sub Private SubCommand1_Click() Text1.Text=S2 Text2.Text=S1 S1="" S2="" End Sub 程序运行后,在Text1中输入“abc”,然后单击命令按钮,在文本框Text1和Text2中显示的内容分别为()。 A.abc和ABC B.abc和abc C.ABC和abc D.ABC和ABC