首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String
admin
2015-08-28
57
问题
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Dim c As String
c=UCase(Chr(KeyCode))
Text2.Text=Chr(Asc(c)+2)
End Sub
当向文本框Text1中输入小写字母a时,文本框Text2中显示的是( )。
选项
A、A
B、a
C、C
D、c
答案
C
解析
KeyDown和KeyUp事件的KeyCode参数返回的是"键",即按字母"A"和"a"时得到的KeyCode的值是相同的,都是&H41。因此程序中对输入"a"时得到的KeyCode,经Chr函数转为字符后为"A",经Ucase函数转换仍为"A",所以变量c中的字符为"A"。Asc(c)将返回变量c中的第一个字符的ASCII,加2后,再由Chr函数转为字符即为"A"后面的第2个字符,即"C"。所以答案应为选项C。
转载请注明原文地址:https://kaotiyun.com/show/PbLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要建立一个随机文件记录学生的信息,如下定义了学生的记录类型,由学号、姓名、5门课程成绩(百分制)组成,下列的定义正确的是()。
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,下划线处应填()。SubEnSure()DimyearAsIntegeryear=Val(InputBox("请输入年份:"))If(yearMod
在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则在以下横线处合适的语句是()。PrivateSubForm_Cl
下列关于MDI子窗体在运行时特性的叙述错误的是()。
下列选项中,不是一个算法的基本特征的是()。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntilnum>6
若要添加CommonDialog控件,则应从“工程”菜单中选定“部件”,在“部件”对话框的“控件”选项卡中选择______,将控件添加到工具箱中。
随机试题
无正当理由连续_______以上未在所承租的廉租住房居住的,享受实物配租的家庭应当按合同约定退回廉租住房。()
在PowerPoint2010中,可以用拖动方法改变幻灯片顺序的视图模式是()
年年岁岁花相似,________。(刘希夷《代悲白头翁》)
下述关于梗死记述中,哪一项是错误的
背景资料:某公路隧道长2800m,穿越的岩层主要由泥岩和砂岩组成,设计采用新奥法施工,分部法开挖,复合式衬砌,洞口段由于洞顶覆盖层较薄,岩隙发育。开挖中地表水从岩石裂隙中渗入洞内,施工单位严格按照新奥法施工的程序进行施工,并对喷锚混凝土的质量进行
医生查房工作的步骤有()。
LongbeforeManlivedontheEarth,therewerefishes,reptiles,birds,insects,andsomemammals.Althoughsomeoftheseanimal
如果一个菜单项的Enabled属性被设置为False,则程序运行时,该菜单项
火山虽然经常给人类带来巨大的灾害,但它也并非一无是处。火山资源的利用也可以带给我们生活的乐趣与便利。一般来说,火山资源主要体现在它的旅游价值、地热利用和火山岩材料方面。火山和地热是一对孪生兄弟,有火山的地方一般就有地热资源。地热能是一种廉价的新能
Inadditiontoconventionalgalaxies,theuniversecontainsverydimgalaxiesthatuntilrecentlywentunnoticedbyastronomers.
最新回复
(
0
)