首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyC
在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyC
admin
2016-11-12
98
问题
在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程:
Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情况下(即不按住Shift键和锁定大写),运行程序,如果按“A”键,则程序输出的是( )。
选项
A、A
a
B、a
A
C、A
A
D、a
a
答案
A
解析
本题考查键盘事件。KeyPreview属性用于设置是否在控件的键盘事件之前激活窗体的键盘事件。KeyPress(KeyAscii As Integer)事件是在对象具有焦点时,按下键盘上的键时触发的事件,其中的KeyAscii参数是所按键的ASCII的代码,每个字符的大、小写形式都是不同的键代码。而Chr()可返回ASCII码对应的字符。KeyDown(KeyCode As Integer,Shift as Integer)事件有两个参数,其中,KeyCode参数是表示所按键的位置信息的代码,只要按下键,就返回该键的位置信息,不区分大小写,一律作为大写字符解释。本题的功能为输入A时,KevDown事件输出大写字符A,而KeyPress事件则输出小写字符a。
转载请注明原文地址:https://kaotiyun.com/show/0sGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在面向对象方法中,对象之间进行通信的构造称为______________。
已知文本框的ScrollBars属性设置为3,却看不到任何效果,原因是()。
设窗体文件中有下面的事件过程:PrivateSubCommandl_Click()Dimsuma%=100PrintaEndSub其中变量a和sum的数据类型分别是(
关系模型允许定义3类数据约束,下列不属于数据约束的是()。
在考生文件夹中有工程文件execise70.vbp及窗体文件execise70.frm。在名为Form1的窗体上有2个框架、7个标签和7个文本框,所有控件已经画好。该程序的功能是:根据给定的图形的三边的边长来判断图形的类型。若为三角形则同时计算出为何种三角
(1)在名称为Forml的窗体上添加一个名称为Textl的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在程序运行时,当用鼠标右键单击文本框时,弹
数据库系统的主要特点为数据集成性、数据的岛_________和低冗余性、数据独立性和数据统一管理和控制。
软件工程研究的内容主要包括:________技术和软件工程管理。
在VisualBasic中,要将一个窗体加载到内存进行预处理但不显示,应使用的语句是()。
随机试题
热淋伴见寒热,口苦呕恶者,宜下列何方合用
患者,男,26岁。因患急性胃肠炎入院,根据医嘱补液1200ml,输液速度为75滴/分,滴系数按每15滴/分计算,该患者输完液体所需的时间是
A.咯血伴脓痰B.咯血伴皮肤黏膜出血C.咯血伴心尖部舒张期杂音D.咯血伴刺激性干咳E.咯血伴黄疸支气管扩张可见()
A.柴胡B.菊花C.升麻D.桑叶E.葛根
道超欠挖原因有()。
某校文学刊物转载的一段评论中有四个注解,其中不正确的一个是()茅盾在《子夜》等小说创作中所努力实现的创作模式,是西方由巴尔扎克、列夫.托尔斯泰、左拉等现实主义、自然主义小说家所成功地实践了的创作模式
试述布鲁纳的认知结构学习理论及其教育含义。
公安赔偿是国家赔偿的一种,包括公安行政赔偿和公安刑事赔偿。()
谋求人类共同繁荣和发展的根本途径是()。
ShortagesoffluvaccinearenothingnewinAmerica,butthisyear’sisawhopper.Untillastweek,itappearedthat100million
最新回复
(
0
)