首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
把窗体的KeyPreview属性设置为Tree,然后编写如下事件过程 Private Sub Form_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii)
把窗体的KeyPreview属性设置为Tree,然后编写如下事件过程 Private Sub Form_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii)
admin
2009-02-10
30
问题
把窗体的KeyPreview属性设置为Tree,然后编写如下事件过程 Private Sub Form_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii) KeyAscii=Asc(UCase(ch)) Print Chr(KeyAscii+2) End Sub 程序运行后,按键盘上的“A”键,则在窗体上显示的内容是______。
选项
A、 A
B、B
C、C
D、D
答案
C
解析
当把窗体的KeyPreview属性设置为True时,按键盘上的键时,就触发窗体的KeyPress事件。如果键盘上按的是“A”,则KeyAscii=97,即小写的“a”,把该字母转化为大写以后,再对Ascii码加2,则为大写的“C”。
转载请注明原文地址:https://kaotiyun.com/show/Zd2p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面是一个Applet程序,其功能是用一组坐标点绘制一个多边形,并通过沿坐标的垂直方向移动,把它移到窗口的下半部分,然后填充它。请改正程序中的错误(有下划线的语句),使程序能输出正确的结果。注意:不改动程序的结构,不得增行或删行。源程序文件
程序中多个线程互相等待对方的持有的锁,而在得到对方持有的锁之前都不会释放自己的锁,就造成了都想得到资源而又都得不到的现象,使线程不能继续运行,这种状态在计算机中称为【】。
软件工程包括3个要素,分别为方法、工具和【】。
有如下程序段 if(x<0){System.out.println("first");} elseif(x<-4){System.out.println("second");} else{System.out.println("third");}
下面是一个Apple(程序,程序的功能是在Applet显示区内画一个动态的、多维的绿色椭圆环。本题主要是通过数学方法sin(),cos()画出一个圆环。请改正程序中的错误(有下划线的语句),使程序能输出正确的结果。注意:不改动程序的结构,不得增行或
下列语句输出结果为()。 publicclasstest { publicstaticvoidmain(Stringargs[]) { intm=20,n=10; System.out.println((
变量作用域是指可访问变量的范围,局部变量在方法中声明,作用域是______。
下面是一个Applet程序,其功能是实现网页上的电子时钟,要求显示的格式为hh:mm:ss如02:04:50。提示:通过获取当前系统时间来实现。请改正程序中的错误(有下划线的语句),使程序能输出正确的结果。注意:不改动程序的结构,不得增行或删行。
对于长度为n的线性表,在最坏情况下,下列各排序法所对应的比较次数中正确的是
Java运行时系统通过【】周期性地释放无用对象所使用的内存,以完成对象的消除。
随机试题
一病死猪,剖检见肺表面有大小不一的灰白色隆起,切开病灶见灰黄色浑浊的凝乳状物流出。该病灶属于
以下关于活动期牙周炎病理变化的叙述,错误的是
长期镉暴露对人体影响的主要靶器官是
哮喘急性发作时,患者需要采取端坐卧位,该卧位属于
皇都大酒店于1999年3月2日被宣告破产。在破产程序中提出的下列给付请求中,哪些能够成为破产债权?( )
背景某系统工程公司承建了南方城市某大楼的泛光照明改造工程,大楼原泛光照明采用2000W钠灯光源,新设计考虑节能环保,选用55W的LED光源及控制模块进行场景控制,并通过控制总线与大楼BA系统集成,还能通过互联网与城市景观照明同步开启和关闭。因建筑
合同成本应当包括从合同签订开始至合同完成为止所发生的、与执行合同有关的( )。
下列税金中,应计入存货采购成本的有( )。
“望秋云,神飞扬,临春风,思浩荡”是宗炳于《画山水序》中提出的。()
Completethetablebelow.WriteNOMORETHANTHREEWORDSforeachanswer.Parksandopenspaces
最新回复
(
0
)