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

admin2020-06-30 54

问题在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim strAs String，nAs 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://kaotiyun.com/show/LbHp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

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

二级VB

NCRE全国计算机二级

在窗体上建立三个菜单（名称分别为Read、Calc和Save，标题分别为“读入数据”、“计算并输出”和“存盘”），然后画一个文本框（名称为Text1，MultiLine属性设置为True，ScrollBars属性设置为2）（如图1－262所示）。程序运行

设有如下函数：FunctionDelSpace(chAsString)AsInteger　　Dimn%，st$，c$　　st＝""　　n＝0　　Fork＝1ToLen(ch)　　　　c＝Mid(ch，k，1)　　　　I

以下关于VB文件的叙述中，正确的是

将文本框的ScrollBar设置为2，文本框中却没有垂直滚动条，其原因可能是

设循环队列的存储空间为Q(1:35)，初始状态为front=rear=35。现经过一系列入队与退队运算后，front=15，rear=15，则循环队列中的元素个数为

下列选项中不属于软件生命周期开发阶段任务的是()。

一个教师讲授多门课程，一门课程由多个教师讲授。则实体教师和课程间的联系是

若实体A和B是一对多的联系，实体B和C是一对一的联系，则实体A和C的联系是

下列关于妊娠合并急性阑尾炎描述错误的是

卵巢囊肿最常见的并发症是()

骨折引起脂肪栓塞是由于

自然保护区的内部未分区的，依照《中华人民共和国自然保护区条例》有关()的规定管理。

设备的装配,可分为()。

X企业出租一台设备给Y企业，租期3个月，收取押金2000元，存入银行，则（　　）。

那时候，老是慎重其事地把左掌右掌看了又看，或者，从一条曲曲折折的感情线，估计着感情的河道是否_。有时，又正经地把一张脸交给一个人，从鼻山眼水中，去_一生的风光。填入画横线部分最恰当的一项是()。

日常生活中，有些人在服药时为图省事，将药片放在口中后，不喝水或仅喝一口水，再用力一咽，就算是服完药了。有些人认为，这种服药方式是不可取的。以下哪项如果为真，最能支持这些人的观点?()

静态随机存储器中，当片选线无效时，则三态数据缓冲器的状态为(　　)

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

二级VB

NCRE全国计算机二级

在窗体上建立三个菜单（名称分别为Read、Calc和Save，标题分别为“读入数据”、“计算并输出”和“存盘”），然后画一个文本框（名称为Text1，MultiLine属性设置为True，ScrollBars属性设置为2）（如图1－262所示）。程序运行

设有如下函数：FunctionDelSpace(chAsString)AsInteger Dimn%，st$，c$ st＝"" n＝0 Fork＝1ToLen(ch) c＝Mid(ch，k，1) I

以下关于VB文件的叙述中，正确的是

将文本框的ScrollBar设置为2，文本框中却没有垂直滚动条，其原因可能是

设循环队列的存储空间为Q(1:35)，初始状态为front=rear=35。现经过一系列入队与退队运算后，front=15，rear=15，则循环队列中的元素个数为

下列选项中不属于软件生命周期开发阶段任务的是()。

一个教师讲授多门课程，一门课程由多个教师讲授。则实体教师和课程间的联系是

若实体A和B是一对多的联系，实体B和C是一对一的联系，则实体A和C的联系是

下列关于妊娠合并急性阑尾炎描述错误的是

卵巢囊肿最常见的并发症是()

骨折引起脂肪栓塞是由于

自然保护区的内部未分区的，依照《中华人民共和国自然保护区条例》有关()的规定管理。

设备的装配,可分为()。

X企业出租一台设备给Y企业，租期3个月，收取押金2000元，存入银行，则（ ）。

那时候，老是慎重其事地把左掌右掌看了又看，或者，从一条曲曲折折的感情线，估计着感情的河道是否_______。有时，又正经地把一张脸交给一个人，从鼻山眼水中，去_______一生的风光。填入画横线部分最恰当的一项是()。

日常生活中，有些人在服药时为图省事，将药片放在口中后，不喝水或仅喝一口水，再用力一咽，就算是服完药了。有些人认为，这种服药方式是不可取的。以下哪项如果为真，最能支持这些人的观点?()

静态随机存储器中，当片选线无效时，则三态数据缓冲器的状态为( )

设有如下函数：FunctionDelSpace(chAsString)AsInteger　　Dimn%，st$，c$　　st＝""　　n＝0　　Fork＝1ToLen(ch)　　　　c＝Mid(ch，k，1)　　　　I

X企业出租一台设备给Y企业，租期3个月，收取押金2000元，存入银行，则（　　）。

那时候，老是慎重其事地把左掌右掌看了又看，或者，从一条曲曲折折的感情线，估计着感情的河道是否_。有时，又正经地把一张脸交给一个人，从鼻山眼水中，去_一生的风光。填入画横线部分最恰当的一项是()。

静态随机存储器中，当片选线无效时，则三态数据缓冲器的状态为(　　)