首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如图所示窗体和以下程序: Pirint Sub Commandl_Click() Text1.Text=”Visual Basic” End Sub Private Sub Text_LostFocus() If Text1.
设有如图所示窗体和以下程序: Pirint Sub Commandl_Click() Text1.Text=”Visual Basic” End Sub Private Sub Text_LostFocus() If Text1.
admin
2019-06-11
47
问题
设有如图所示窗体和以下程序:
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事件过程,在Command 1的Click事件过程中,设置文本框的Text1.Text属性为“Visual Basic”。同时,由于鼠标从文本框移动到命令按钮,文本框失去焦点,触发文本框的LostFocus事件,在该事件代码里面,判断文本框内容是否为“BASIC”,由于在前面的Commandl的事件过程中设置了文本框的Text属性为“Visual Basic”,和“BASIC”不相等,因此该if判断条件成立,接下来把文本框的Text清空,并设置文本框获取输入焦点。
转载请注明原文地址:https://kaotiyun.com/show/7RUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Picturel的图片框和一个名称为Timer1的计时器控件,并有下面程序代码:Dimx%,V%PrivateSubForm_Load()x=Picturel.Width*2y=Picture
设a=5,b=10,执行语句c=Int((b—a)*Rnd+a)+1后,c中数值的范围是()。
在VisualBasic中,所谓“文件”指的是()。
医院里有不同的科室,每名医生分属不同科室,则实体科室与实体医生间的联系是()。
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=""strL=Lea(xStr)
下面关于计时器控件的叙述中正确的是()。
在商场购物中,实体顾客和实体商品之间的联系是()。
下面对对象概念描述正确的是
数据库系统的核心是()。
随机试题
Asheartdiseasecontinuestobethenumber-onekillerintheUnitedStates,researchershavebecomeincreasinglyinterestedin
男性,46岁,车祸导致骨折并有大出血,病人有休克表现,应采取的体位是
患者男,36岁。转移性右下腹疼痛8小时入院,患者腹痛为阵发性疼痛,开始位于剑突下,4小时后疼痛转移至右下腹部,并有压痛、反跳痛,伴有恶心、呕吐,T38℃,无咳嗽、胸闷、气促。应予以下面哪些检查
患者,李某,平素有去公园晨练习惯,今晨在跑步时,与他人碰撞后争吵,因为情绪激动片刻后不明原因倒地不起,伴随有呕吐等症状,拨打120后急诊医生到现场后查体示意识障碍、出现脑膜刺激征,以颈强直最明显。影像学检查范围是
关于空心桥墩构造的说法,正确的是()。【2011年真题】
下列各项中不需要进行责任结转的是()。
下列行为不适用吊销生产许可证的是()。
关系R和S如下表所示,关系代数表达式Π1,4(R∞(下标)R.C<S.B S)的结果为(201),与该表达式等价的SQL语句为(202)。R关系S关系ABCAB
IfnooneobjectsMr.Benwillbethenextchairman.
LastmonthTomwentonholidaytoFrance.HecaughtthetrainfromLondontoDoverandthenwentbyboatacrosstheChannel.He
最新回复
(
0
)