D.im S1 As String, S2 As String
Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
E.nd Sub
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
S2 = S2 & Chr(KeyCode)
E.nd Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
S1 = S1 & Chr(KeyAscii)
E.nd Sub
Private Sub Command1_Click()
Text1.Text = S2
Text2.Text = S1
S1 = ""
S2 = ""
E.nd Sub
程序运行后,在 Text1 中输入 “ abc ” ,然后单击命令按钮,在文本框 Text1 和 Text2 中显示的内容分别为
A. ) abc 和 ABC
B. ) abc 和 abc
C. ) ABC 和 abc
D. ) ABC 和 ABC