首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Textl_KeyUp(KeyCode As Integer,Shift As Integer) Dim C As Stri
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Textl_KeyUp(KeyCode As Integer,Shift As Integer) Dim C As Stri
admin
2016-06-30
25
问题
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:
Private Sub Textl_KeyUp(KeyCode As Integer,Shift As Integer)
Dim C As String
C=UCase(Cllr(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/UlLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
语句Fontsize=Fontsize*2的功能是______。
设有程序:OptionBase1PrivateSubCommand1_Click()Dimarr1,MaxasIntegerarr1=Array(12,435,76,24,78,54,866,43)
在下列关于二叉树的叙述中,正确的一项是
下列叙述中错误的是
在VB6.0中,要显示程序代码,必须在______窗口。
在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。能够正确实现上述
程序测试分为静态测试和动态测试。其中______是指不执行程序,而只是对程序文本进行检查,通过阅读和讨论,分析和发现程序中的错误。
下面程序运行结果是()。PrivateSubForm_Click() DimxAsSingle,yAsSingle x=InputBox("请输入数据25"):y=InputBox("请输入数据10")
在树形结构中,树根结点没有______。
下列关于线性链表的描述中,正确的是()。I、只含有一个指针域来存放下一个元素地址Ⅱ、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件)Ⅲ、结点由两部分组成:数据域和指针域。
随机试题
________是化妆师咨询的最重要部分。
出现酮症的病因可有
白血病患者因头痛、恶心、呕吐、视力模糊、颈强直等确诊为中枢神经系统白血病,最多见的是( )
A.医生、患者各自的权利与义务B.医务人员受患者的委托或其他原因,对患者实施诊断、治疗等医疗行为所形成的关系C.医患之间就医疗某环节产生认识上的分歧,且患方提出损害赔偿D.医务人员疏忽大意违反卫生法律相关规定,给患者造成明显人身伤害E.为避免患者的
根据现行规定,纳税人提供武装守护押运服务的,按照()缴纳增值税。
下列各项中,不适用13%低税率的是()。
某男,30岁。从小循规蹈矩,对自己要求严格,追求完美。近两年来出现怕脏,而每天反复洗手多次,并反复检查门窗是否关好,明知没有必要却控制不住。有时走到高楼上就有一种想跳下去的强烈冲动,担心控制不住而焦虑万分,为此回避登高。经常失眠,影响了正常的工作生活。
2018年5月4日,纪念马克思诞辰200周年大会在北京人民大会堂隆重举行。马克思给我们留下的最有价值、最具影响力的精神财富,就是以他名字命名的科学理论——马克思主义。下列关于马克思和马克思主义的表述正确的是______。
清末的教育改革都进行了哪些尝试?
Thesenserelationshipbetween"male"and"female"is______.
最新回复
(
0
)