首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在窗体上有个文本框,然后编写如下的事件过程: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Const Alt=4 Const Key_F2=&H71 a
设在窗体上有个文本框,然后编写如下的事件过程: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Const Alt=4 Const Key_F2=&H71 a
admin
2009-01-15
57
问题
设在窗体上有个文本框,然后编写如下的事件过程: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)>0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text="BBBBB" End If End Sub 上述程序运行后,如果按【Shift+F2】,则在文本框中显示得是
选项
A、Alt+F2
B、BBBBB
C、随机出几个数
D、文本框平均内容无变化
答案
8
解析
此题是有关KeyDown事件的题目,KeyDown是当一个键被按下时
所产生的事件,而KeyUp是松开被按的键时产生的事件,如果要判断是否按下了某个转
换键,可以用逻辑运算符And。例如:先定义了下面3个符号常量:Const Shift=1,Const
Ctrl=2,Const Alt=4;然后用下面的语句判断是否按下Shift、Ctrl、Alt键;
如果Shift And Shift > 0,则按下了Shift键;
如果Shift And Ctrl > 0,则按下了Ctrl键;
如果Shift And Alt > 0,则按下了Alt键;
这里的Shift时Key]Down的第二个参数;此事件过程中的If后的条件语句如果为真,
则是按下了Alt+F2,而本题目中是按下了Shift+F2,所以不执行Then语句,即文本框的
内容无变化。
转载请注明原文地址:https://www.kaotiyun.com/show/bS2p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
程序设计语言的基本成分是数据成分、运算成分、控制成分和()。
设有关系R(S,D,M),其函数依赖集F={S→M,D→M},则关系R至少满足()。
下列关于Java语言的异常处理描述不正确的是
下面是一个Applet程序,其功能是通过两个文本框获得用户输入的两个数,按回车键计算这两个数的商。请改正程序中的错误(有下画线的语句),使程序能输出正确的结果。注意:不改动程序的结构,不得增行或删行。importjava.awt.
在DOS系统中,下列文件名中非法的是()。
【】类是提供线程操作和管理的类。
如果在Applet中要访问一个HTML文件,可以请求浏览器实现相应HTML文本的显示。通过AppletContext的【】方法,Applet可以通知浏览器在哪个窗口中显示哪个URL中的文件。
什么情况下需要数据类型的强制转换
循环链表的主要优点是
随机试题
自准直仪有双分划板型自准直仪、阿贝型自准直仪和安培型自准直仪。()
患者,男性,54岁。右下腹隐痛半年。近2个月来低热、乏力、消瘦。查体:结膜苍白。右侧腹部可触及肿块。该患者最有可能的诊断是
劳动争议仲裁委员会作出仲裁裁决后15日内,如果当事人对裁决中的部分事项不服,并依法向人民法院起诉的,则劳动争议仲裁裁决( )。
10(6)kV配变电所专用电源线的进线开关宜采用()。
《建设工程施工合同(示范文本)》通用条款规定,承包人对( )的保修期限应为5年。
甲开发商委托乙设计公司进行施工图设计,由乙公司设计师丙负责具体设计工作;对于设计图纸的著作权归属没有约定,则该施工图设计的著作权属于()。
产业保护政策的目的在于减小国外企业对本国幼稚产业的冲击。()
尝试与错误学习的基本规律是效果律、练习律和______。
InternetdatashowsthatAmericanyoungeradultshavebecometheprimarygroupmadaboutalteringtheirpersonalappearance.Onc
GPSA)TheGlobalPositioningSystemisa.space-basedtriangulationsystemusingsatellitesandcomputerstomeasurepositi
最新回复
(
0
)