首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如图所示窗体和以下程序: Pirint Sub Commandl_Click() Text1.Text="Visual Basic" End Sub Private Sub Text_LostFocus()
设有如图所示窗体和以下程序: Pirint Sub Commandl_Click() Text1.Text="Visual Basic" End Sub Private Sub Text_LostFocus()
admin
2019-04-29
32
问题
设有如图所示窗体和以下程序:
Pirint Sub Commandl_Click()
Text1.Text="Visual Basic"
End Sub
Private Sub Text_LostFocus()
If Text1.Text<>"BASIC"Then
Text1.Text="":Text SetFocus
End If
End Sub
程序运行时,在Text1文本框中输入“Basic"(如图所示),然后单击Command按钮,则产生的结果是
选项
A、文本框中无内容,焦点在文本框中
B、文本框中为“Basic”,焦点在文本框中
C、文本框中为“Basic”,焦点在按钮上
D、文本框中为“Visual Basic”,焦点在按钮上
答案
A
解析
本题考查控件属性和事件过程。单击Commandl命令按钮,执行命令按钮的Click事件过程,在Commandl的Click事件过程中,设置文本框的Textl.Text属性为“Visual Basic”。同时,由于鼠标从文本框移动到命令按钮,文本框失去焦点,触发文本框的LostFocus事件,在该事件代码里面,判断文本框内容是否为“BASIC”,由于在前面的Commandl的事件过程中设置了文本框的Text属性为“Visual Basic”,和“BASIC”不相等,因此该if判断条件成立,接下来把文本框的Text清空,并设置文本框获取输入焦点。
转载请注明原文地址:https://kaotiyun.com/show/R1Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
文本框的Locked属性被设置为True后产生的效果是
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是
下列控件中,不响应Click事件的是
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
窗体的MouseUp事件过程如下:PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)EndSub关于以上定义,以下叙述中错误的是
以下关于VB特点的叙述中,错误的是
下列是VisualBasic中所允许的形式数是()。
在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经给出所有控件。程序运行时,单击“开始”按钮,则汽车图标向右运动;单击“停止”按钮则汽车停止运动;移动滚动条上的滚动框,可以改变汽车的运动速度(滚动框向右移动,速度减慢)。如图3-86所示。要求如下:
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画两个标签(名称分别为lblName和lblAge,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为txtName和txtAge,Text属性
随机试题
电子商务战略
慢性非传染性疾病的过早死亡与下列哪项有关
某女,28岁。每逢社交场合,精神紧张则腹部绞痛,痛则欲泻,泻后则痛止,平时饮食、睡眠、二便均佳,舌正常,脉缓。辨证为
进口货物直接退运的,进出口货物报关单“备注”栏填写《准予直接退运决定书》或者《责令直接退运通知书》编号。
作为现代教育的代言人,杜威的主要教育观点是()。
一个人从县城骑车去乡办厂。他从县城骑车出发,用30分钟时间行完了一半路程,这时,他加快了速度,每分钟比原来多行50米。又骑了20分钟后,他从路旁的里程标志牌上知道,必须再骑2千米才能赶到乡办厂,则县城到乡办厂之间的总路程为()。
就业平等权:指公民不论其民族、种族、性别、宗教信仰、家庭背景等的不同和差异,均享有平等获得就业机会的权利。根据上述定义,下列没有侵犯求职者的就业平等权的是()。
十字军东征
HowisAlicenow?
AfterthePresident’sSonsWereImprisonedIndividualsmakeuphistory,whilehistorygovernsindividuals’actionsandthoug
最新回复
(
0
)