在窗体上有一个文本框Textl,Text属性值为空,然后编写如下事件过程: Private Sub Text_KeyPress(KeyAscii As Integer) Dim str As String,n As Integer str=UCase(Ch

admin2020-07-22  43

问题 在窗体上有一个文本框Textl,Text属性值为空,然后编写如下事件过程:
Private Sub Text_KeyPress(KeyAscii As Integer)
Dim str As String,n As Integer
str=UCase(Chr(KeyAscii))
n=Len(str)
Textl.Text=String(n,str)
End Sub
程序运行后,如果在文本框中输入字母”p”,则在文本框中显示的内容为(     )。

选项 A、pp
B、pP
C、PP
D、Pp

答案B

解析 考查字符串函数的应用。在Textl中按下字母”p”,则首先显示字符”p”,接下来触发KeyPress事件,其中,UCase把字符”p”转化为大写字母,显示人写字母”P”。
转载请注明原文地址:https://jikaoti.com/ti/ThS0FFFM
0

最新回复(0)