首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如图所示窗体和以下程序: Pirint Sub Commandl_Click() Text 1.Text=”Visual Basic” End Sub Private Sub Text_LostFocusO If Text 1.
设有如图所示窗体和以下程序: Pirint Sub Commandl_Click() Text 1.Text=”Visual Basic” End Sub Private Sub Text_LostFocusO If Text 1.
admin
2018-10-15
59
问题
设有如图所示窗体和以下程序:
Pirint Sub Commandl_Click()
Text 1.Text=”Visual Basic”
End Sub
Private Sub Text_LostFocusO
If Text 1.Text<>”BASIC”Then
Textl.Text=””:Text SetFocus
End If
End Sub
程序运行时,在Textl文本框中输入“Basic”(如图所示),然后单击Command按钮,则产生的结果是
选项
A、文本框中无内容,焦点在文本框中
B、文本框中为“Basic”,焦点在文本框中
C、文本框中为“Basic”,焦点在按钮上
D、文本框中为“Visual Basic”,焦点在按钮上
答案
A
解析
本题考查控件属性和事件过程。单击Commandl命令按钮,执行命令按钮的Click事件过程,在Command1的Click事件过程中,设置文本框的Text1.Text属性为“Visual Basic”。同时,由于鼠标从文本框移动到命令按钮,文本框失去焦点,触发文本框的LostFocus事件,在该事件代码里面,判断文本框内容是否为“BASIC”,由于在前面的Commandl的事件过程中设置了文本框的Text属性为“Visual Basic”,和“BASIC”不相等,因此该if判断条件成立,接下来把文本框的Text清空,并设置文本框获取输入焦点。
转载请注明原文地址:https://kaotiyun.com/show/bUFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有数组声明:Dims(2,3),下面错误的程序段是
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimiAsInteger,nAsInteger Fori=0To
设窗体上有Text1、Text2两个文本框,并编写了下面的程序代码:PrivateSubText1_KeyPress(KeyAsciiAsInteger)If"A"
下面关于菜单的叙述中正确的是
以下语句或子句中,符合VisualBasic语法要求的是
为把变量a、b、c中的最大值赋值给变量x,下面语句中正确的是
下列关于栈的叙述中,正确的是
用来设置文字字体是否为粗体的属性是( )。
设在一个工程的窗体中有如下代码:PublicxAsIntegerPrivateSubForm_Load()DimyAsIntegerEndSub在该工程的标准模块的声明部分有如下代码:
设有如下声明语句OptionBase1Dimarr(2,-1To5)AsInteger则数组arr中数组元素的个数是
随机试题
Conversationbecomesweakerinsocietythatspendssomuchtimelisteningandbeingtalkedto______ithasallbutlostthewil
糖皮质激素的作用中不包括()
单只标的证券的融资余额达到该证券上市可流通市值的()时,交易所可以在次一交易日暂停其融资买入,并向市场公布。
关于国家出资企业的义务和责任,下列表述正确的有()。
“尽信书,则不如无书”出自________.
(2016·安徽)教师发现班上有一名学生缺课,就会联想到该生缺课的各种可能性。这种心理活动属于()
Responsestohislatestmoviehavegenerallybeen______.
ISO/IEC9126软件质量模型中,可靠性质量特性包括多个子特性。一软件在故障发生后,要求在90秒内恢复其性能和受影响的数据,与达到此目的有关的软件属性为()子特性。
RATIOCINATION:LOGIC::
VictoriaBarzilaiopenedhermouthwidesothedoctorcouldlookathersorethroat.Not【C1】______aremarkableevent,excepttha
最新回复
(
0
)