问题
填空题
在窗体文本框Text1中输入“456ABC”后,立即窗口上输出的结果是______。
Private Sub Text1 KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 97 To 122
Debug.Print UCase(Chr(KeyAscii));
Case 65 To 90
Debug.Print LCase(Chr(KeyAscii));
Case 48 To 57
Debug.Print Chr(KeyAscii);
Case Else
KeyAscii=0
End Select
End Sub
答案
参考答案:456aBc
解析: 本题程序首先判断文本框中输入字符的ASCⅡ码,如果该字符的ASCⅡ码在97~122之间,则使用Ucase函数将其转换为大写形式,如果该字符的ASCⅡ码在65-90之间,则使用Lcase函数将其转换为小写形式,如果该字符的ASCⅡ码在48~57之间,则保持不变,当KeyAscii的值为0时,结束判断。