2. 计算机
  3. 在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程： Private Sub Text1_Keyaress(KeyAscii As Integer) Dim str As String，n As Integer str=UCase(C

在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程： Private Sub Text1_Keyaress(KeyAscii As Integer) Dim str As String，n As Integer str=UCase(C

admin2020-02-27  169
问题 在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程：
Private Sub Text1_Keyaress(KeyAscii As Integer)
Dim str As 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事件，其中，UCase把字符“p”转化为大写字母，显示大写字母“P”。
转载请注明原文地址:https://www.kaotiyun.com/show/CxTp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)