首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个文本框,其名称为Text1,编写下列事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(
在窗体上有一个文本框,其名称为Text1,编写下列事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(
admin
2013-04-11
88
问题
在窗体上有一个文本框,其名称为Text1,编写下列事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str As String
str=Chr(KeyAscii)
KeyAscii=Asc(UCase(str))
Text1.Text=Stririg(2,KeyAscii)
End Sub
程序运行后,如果在键盘上输入字母“a”,则在文本框Text3中显示的内容为( )。
选项
A、aaa
B、AAA
C、AA
D、aa
答案
B
解析
UCase(str)将str转成大写的字符串;String(n,character)返回n个重复的字符,如果character是ASCII码,则返回其对应的字符。程序运行过程为:首先输入字母“a”,并通过“str=Chr(KeyAscii)”语句将a的ASCII值转换成字符串;然后通过“KeyAscii=Asc(UCase(str))”求得大写A的ASCII值,并显示在文本框中;最后通过“Text1.Text=String(2,KeyAscii)”语句为文本框输入了两个字母“A”,所以最后在文本框中显示出3个大写字母“A”。
转载请注明原文地址:https://www.kaotiyun.com/show/Yahp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
MicrosoftVisualBasic6.0包括三种版本,其中不包括______。
在窗体上画一个文本框,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimcharAsStringchar=Chr(KeyAscii)
当我们输入代码时,VisualBasic可以自动检测______错误。
执行下列程序后,鼠标单击窗体,输出结果为PrivateSubForm_Click()Print"Click";EndSubPrivateSubForm_MouseDown(ButtonAsIntege
要建立一个学生成绩的随机文件,如下定义了学生的记录类型,由学号、姓名、三门课程成绩(百分制)组成,下列程序段正确的是
单个用户使用的数据视图的描述称为
以下Prime过程,用于判断一个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数,就是合数。用被测试的数除以从2开始到该数本身的数,如果能除尽(余数为0),则为合数;如果都除不尽(余数均不为0),则为素数。请在划线处将下面过程补充完整:
下面不属于软件工程的3个要素的是______。
以下关于焦点的叙述中,错误的是______。
以下关系表达式中,其值为假的是:______。
随机试题
CaliforniansandNewEnglandersspeakthesamelanguageand______bythesamefederallaws.
判断药物的纯度是否符合药品标准的规定要求,通常进行
下列哪项心电图改变对鉴别心肌梗死与心绞痛最有意义
输送装置的主要组成部分是传送带或输送机,其主要作用是使待分拣商品鱼贯通过控制装置、分类装置()。
春之怀古张晓风①春天必然曾经是这样的:从绿意内敛的山头,一把雪再也撑不住了,噗嗤的一声,将冷面笑成花面,一首澌澌然的歌便从云端唱到山麓,从山麓唱到低低的荒村,唱入篱落,唱入一只小鸭
—Iwanttohavemyhairdone.【H1】______—Youcantakealookatthismagazine.Ithassomeoftheneweststyles.—Ah...Iliket
设y=y(x)为微分方程Y"+4y’+4y=4e—2x的满足初始条件y(0)=1,y’(0)=0的特解,则
A.risenB.smoothC.friendlyD.exceedingE.rapidF.varyG.expensiveH.suddenI.whileJ.raisedK.responseL.fo
Povertyexistsbecauseoursocietyisanunequalone,andtherearcpowerfulpoliticalpressurestokeepitthatway.Anyattemp
Forthosepeoplewhogooutinsearchofadventure,alongdistanceflightinahotairballoonisaparticularlyexcitingprospec
最新回复
(
0
)