首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的 KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的 KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form
admin
2020-04-18
18
问题
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的
KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As String Private Sub Form_KeyPress(KeyAscii_
Private Sub Form_Load() As Integer)
Text1.Text="":Text1.SetFocus SaveAll=SaveAll+Chr(KeyAscii)
End Sub End Sub
Private Sub Command1_Click()
Text1:Text=LCase(SaveAtl)+SaveAlt
End Sub
程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为
选项
A、vbVB
B、不显示任何信息
C、VB
D、出错
答案
A
解析
本题考查的考点是有关键盘事件的。KeyPreview属性用于设置是否在控件的键盘事件之前激活窗体的键盘事件。KeyPress(KeyAscii As Integer)事件是在对象具有焦点时,按下键盘上的键时触发的事件,KeyAscii参数是所按键的ASCII的代码,将每个字符的大、小写形式作为不同的键代码解释。本题中输入“VB”的时候触发了窗体的KeyPress事件,将全局变量SaveAll设置为了“VB”,所以单击命令按钮后,文本框中的值为“vbVB”。
转载请注明原文地址:https://www.kaotiyun.com/show/xfTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是( )。
文本框接受的最长字符数由文本框的()属性确定。
标准模块中有如下程序代码:PublicxAsInteger,YAsIntegerSubTempSub()x=10:y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommand1_Click(
下面关于数据库三级模式结构的叙述中,正确的是()。
在考生文件夹下有一个工程文件sit5.vbp,其名称为Forml的窗体上已有三个文本框Textl、Text2、Text3,以及程序。请完成以下工作:①在属性窗口中修改Text3的适当属性,使其在运行时不显示,作为模拟的剪贴板使用,窗体如图3.152所示;
在E-R图中,用来表示实体联系的图形是( )。
VB中,若没有显式声明变量的数据类型,则默认的类型是
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
列表框中被选中的数据项的位置可以通过一个属性获得,这个属性是( )。
如图5所示,在列表框Listl中已经有若干人的简单信息,运行时在Textl文本框(即”查找对象”右边的文本框)中输入一个姓或姓名,单击”查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹
随机试题
患者男性,42岁,胸部不适,咳嗽2个月。患者做了如下检查,哪项检查最有意义,为医生进一步的治疗提供依据
治疗皮肤粘膜综合征的首选药物是
对药物制剂配伍说法不正确的是
证券公司办理集合资产管理业务,设立非限定性集合资产管理计划的,净资本不低于人民币10亿元。()
下列各句中成语的使用,正确的一项是:①小李经过五年的努力,村边鱼塘已初具规模,他现在可以_______了。②教育部取消考生报考普通高等院校的年龄及婚否限制之后,许多大龄青年_______,决心圆大学之梦。③近年来,《苹果日报》在香港
2.【】的任务是诊断和改正程序中的错误。
以下函数实现的功能是__________。voidfun(char*s){char*p,*q,temp;p=s;q=s+strlen(s)-1;while(p
在下述关于数据库系统的叙述中,正确的是______.
在设计报表的过程中,如果要进行强制分页,应使用的工具图标是()。
TheLostArtofListeningA)"Whywon’theevenlistentomyidea?""WhyamIcutoffbeforeIprovidethewholestory?"How
最新回复
(
0
)