首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在窗体上有个文本框,然后编写如下的事件过程。 Private Sub Text1_KeyDown(KeyCode As Integef,Shift As Integer) Const Alt=4 ConstKey_F2=
设在窗体上有个文本框,然后编写如下的事件过程。 Private Sub Text1_KeyDown(KeyCode As Integef,Shift As Integer) Const Alt=4 ConstKey_F2=
admin
2013-01-23
71
问题
设在窗体上有个文本框,然后编写如下的事件过程。 Private Sub Text1_KeyDown(KeyCode As Integef,Shift As Integer) Const Alt=4 ConstKey_F2=&H71 altdown%=(Shift And Alt)>0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text= "BBBBB" End If End Sub 上述程序运行后,如果按[Shift+F12],则在文本框中显示得是
选项
A、Alt+n
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时KeyDown的第2个参数;此事件过程中的If后的条件语句如果为真,则是按下了Alt+ 12,而本题中是按下了Shift+F2,所以不执行Then语句,即文本框的内容无变化。
转载请注明原文地址:https://www.kaotiyun.com/show/gwhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为()。OptionBase1PrivateSubfun(a()AsInteger,nAsInteger)ReDimPreservea(6
关于结构化程序设计原则和方法的描述错误的是
如果文本框的Enabled属性被设置为False,则运行时
VisualBasic程序中语句行的续行符是
设待排序关键码序列为(33,18,9,25,67,82,53,95,12,70),要按关键码值递增的顺序排序,采取以第一个关键码为分界元素的快速排序法,第一趟排序完成后关键码33被放到了第______个位置。
运行下列程序:PrivateSubFormClick()Sum=0Fori=1To100IfMid(CStr(i),1,1)="1"ThenSum=Sum+1
要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应将该列表框的MultiSelect属性设置为
下面有关E-R模型向关系模型转换的叙述中,不正确的是()。
设x=7,y=9,则以下表达式值为“真”的是
在窗体上画一个名称为List1的列表框,一个名称为Labell的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。
随机试题
Twoshipswerebarely______onthehorizon.
A、Theyarewronglydefined.B、Theyinteractwitheachother.C、Theycanbeconfusingsometimes.D、Theyarereplaceablewitheach
A.相乘B.相克C.子病犯母D.相侮E.母病及子
COlles骨折肩关节脱位
关于辩论原则的表述,下列哪些选项是正确的?
关于危害结果的相关说法,下列哪一选项是错误的?
下列不属于基金财务会计报告分析目的的是()。
下列属于影响财务管理的经济环境因素的有()。
商标注册申请争议的解决机制是()。
IfyouliveinacityinNorthAmericaorEurope,youhaveprobablyneverthoughtmuchaboutwater.Wheneveryouneedsome,you
最新回复
(
0
)