问题:[选择题]
A.PrivateSubFormLoad()ShowText1.Text=""Text2.Text=""Text2.SetFocusEndSubPrivateSubText2_KeyDown(KeyCodeAsInteger,ShiftAsIntegeText1.Text=Chr(KeyCode-4)EndSub
B.PrivateSubForm_Load()ShowText1.Text=""Text2.Text=""Text2.SetFocusEndSubPrivateSubText2_KeyDown(KeyCodeAsInteger,ShiftAsIntegeText1.Text=Text1.Text+Chr(KeyCode-4)EndSub
C.PrivateSubForm_Load()ShowText1.Text=""Text2.Text=""Text2.SetFocusEndSubPrivateSubText2_Click(KeyCodeAsInteger,ShiftAsIntegeText1.Text=Text1.Text+Chr(KeyCOde-4)EndSub
D.PrivateSubForm_Load()ShowText1.Text=""Text2.Text=""Text2.SetFocusEndSubPrivateSubText2_Click(KeyCodeAsInteger,ShiftAsIntegeText1.Text=Chr(KeyCode-4)EndSub
● 参考解析
[分析]当在文本框Text2中输入小写字母时,能触发的是KeyDown事件,而不能触发Click事件,所以选项C和D是错误的。选项A的文本框中每次只能显示一个字符,而选项B是正确的答案。