在窗体上有一个文本框Text1,Text属性值为空,然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii AsInteger) Dim strAs String,n As Integer

admin2020-02-27  23

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

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

答案B

解析 本题考查字符串函数的应用。在‘Text1中按下字母“p”,则首先显示字符“p”,接下来触发KeyPress事件,其中,UC88e把字符“p”转化为大写字母,显示大写字母“P”。
转载请注明原文地址:https://kaotiyun.com/show/7LTp777K
0

最新回复(0)