首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有一个名称为Text1的文本框,并有下面的程序代码: Private Sub Form_Load() KeyPreview=True End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Pr
设窗体上有一个名称为Text1的文本框,并有下面的程序代码: Private Sub Form_Load() KeyPreview=True End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Pr
admin
2019-03-14
33
问题
设窗体上有一个名称为Text1的文本框,并有下面的程序代码:
Private Sub Form_Load()
KeyPreview=True
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii+1),
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
程序运行后在文本框中输入字母“D”,则窗体上显示的是( )。
选项
A、D E
B、E D
C、D
D、E
答案
B
解析
在Form_Load事件中,设置窗体的KeyPreview属性为True,表示窗体比其内部的其他控件优先获得键盘事件的激活权,故本题中,Form_KeyPress事件会优先于text1_KeyPress事件而执行,所以第一次输出Form_KeyPress事件执行的结果“E”,然后再执行Text1_KeyPress事件,输出结果“D”,所以B选项正确。
转载请注明原文地址:https://kaotiyun.com/show/xzUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序:PrivateSubForm_Click() num=InputBox("请输入一个实数") p=InStr(num,".") Ifp>0Then PrintMid(num,p+1) Else
编写如下程序:PrivateSubCommand1_Click() DimiAsInteger,jAsInteger n=InputBox("输入一个大于1的正整数") Fori=2Ton Forj=2To
若要使文本框能够输入多行文本,应该设置的属性是( )。
设计窗体时,双击窗体上没有控件的地方,打开的窗口是
窗体上有一个Text1文本框,并编写了下面事件过程:PrivateSubText1一KeyPress(KeyAsciiAsInteger)KeyAscii=KeyAscii+3EndSub程序运行时,在文本框中输入字符“A”,则在文本框
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
软件测试的目的是
在软件开发中,需求分析阶段产生的主要文档是
一间宿舍可住多个学生,则实体宿舍和学生之间的联系是
在考生文件夹下有一个工程文件sjt4.vbp。运:行程序,按下鼠标左键,并在窗体上拖动鼠标时,沿鼠标移动可在窗体上画出一系列圆,如图3-110所示。给出的程序不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容。注意:考生不得修改窗体文件中
随机试题
女患者,28岁,停经50天,恶心呕吐10天,加重3天,食入即吐,呕吐酸苦水,胸胁满闷,头晕头胀,烦渴口苦,舌淡红,苔薄黄,脉弦滑,查尿妊娠试验阳性,中医辨证为:
A、发汗B、晒干C、置沸水中烫或蒸至无白心D、以烟火慢慢熏干E、置沸水中煮至恰无白心当归的加工方法为
某工程投标出现下列情形,评标委员会应当否决的投标是()。
液氮
一个投资项目,初始投资20000元,共投资4年,每年末的现金流分别为3000元,5000元,6000元和9000元,IRR为()。
下列各项资产中,采用可变现净值计量属性的是()。
某租赁公司于2011年11月21日与B企业签订租赁合同,将一台大型专用设备以融资租赁方式租赁给B企业;下年1月1日起租,租赁期为三年。租赁开始日估计的租赁期届满时租赁资产的公允价值为2250万元,B企业担保的资产余值为450万元,B企业的子公司担保的资产
设函数f(x)=|tx一x2|dt(x>0),求f(x)并求f(x)的最小值.
在Ethernet帧中,前导码字段的长度是()。
O’Neillwasoneofthemostfamousadvocatesofawayofwritingcalled"naturalism."Thisinvolvedbothatechniqueandaway
最新回复
(
0
)