单选题
在窗体上画一个文本框(Text1),然后编写如下事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim char As String
char=Chr(KeyAscii)
KeyAscii=Asc(UCase(char))
Print String(4,KeyAscii)
End Sub
程序运行后,在输入文本框Text1中输入“A”,则程序在窗体上的输出结果为______。
A、
a
B、
A
C、
aaaa
D、
AAAA
【正确答案】
D
【答案解析】
[解析] Chr(x)是把x的值转换为相应的ASCII字符,Asc(x)是返回字符串x中笫一个字符的ASCII码,Ucase(“字符串”)把“字符串”中的小写字母转换为大写字母。本程序中是把在文本框中输入的字符都转换成4个大写字符输出。
提交答案
关闭