首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个文本框,其名称为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
90
问题
在窗体上有一个文本框,其名称为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://kaotiyun.com/show/Yahp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要把一个命令按钮设置成无效,应设置属性______的值为False。
下列四个关于DoEvents语句的叙述中,正确的是______。
在软件工程中,白箱测试法可用于测试程序的内部结构。此方法将程序看做是______。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dimarr(10,10)AsInteger,i,jAsInteger
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Fori=1To4X=4Forj=1To2X=x+6
软件维护活动包括以下几类;改正性维护、适应性维护、【】维护和预防性维护。
在窗体上画一个通用对话框,程序运行后,通过ShowOpen方法显示”打开”对话框,要求在该对话框的“文件类型”栏中只显示扩展名为.DOC的文件,则对通用对话框的Filter属性的正确设置是:______。
若在Shape控件内以FillStyle属性所指定的图案填充区域,而填充图案的线条的颜色由FillColor属性指定,非线条的区域由BackStyle属性填充,则应______。
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于【】的联系。
下面不属于软件设计原则的是
随机试题
张某家住闹市区,人口密集交通便利,打算在自家的小平房开一个小卖部,便向工商行政管理部门申请营业许可。该营业许可属于()性质的行政许可。
A、Theyweren’tthefirsttorecordobservationsofsunspots.B、Theybelievedthatthespotsweren’tactuallyontheSim.C、They
排斥反应
某企业按使用程度把消费者分为首次购买者、经常购买者、潜在购买者和非购买者,这种市场细分的依据属于()
《聊斋志异》是我国( )朝的小说作品。
电镜下,脂肪变性的脂滴形成于
下列选项中最有可能由格式塔学派提出的是()
debenture
Thequestionsinthisgrouparebasedonthecontentofapassage.Afterreadingthepassage,choosethebestanswertoeachque
A、TomakesurethatMr.Smithhasreceivedthecatalogueofthecaller’scompany.B、TohaveatalktoMr.Smith.C、TogiveMr.S
最新回复
(
0
)