在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母e,则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char as

admin2009-03-15  39

问题 在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母e,则文本框中显示的内容为 ______。    Private Sub Text1_KeyPress(KeyAscii As Integer)    Dim char as String     char=Chr(KeyAscii)    KeyAscii=Asc(UCase(char))    Text1.Text=String(5,KeyAscii)    End Sub

选项 A、eeeee
B、EEEEE
C、eeeeee
D、EEEEEE

答案8

解析 该程序段用到了4个函数,在按了键盘上的某个键(在这里是字母键e)后,Chr函数将得到的键的 Ascii码值(101)转换成该ASCII码值对应的字符(e),然后利用UCase函数将该字符转换成大写字母(E),将该大写字母的ASCII码值(利用函数ASC())赋给KeyAscii,最后利用String函数将5个ASCII码值等于 KeyAscii的字符(即5个E)赋给文本框Text1,此时文本框中将显示5个E,又因为KeyPress事件本身会在文本框中显示/输入一个ASCII码值为KeyAscii的字符(E),因此最后在文本框中将显示6个大写字母E。
转载请注明原文地址:https://jikaoti.com/ti/0nq0FFFM
0

最新回复(0)