2. 计算机
  3. 设有如图所示窗体和以下程序： Pirint Sub Command1_Click() Text1．Text="Visual Basic" End Sub Private Sub Text LostFocus() If

设有如图所示窗体和以下程序： Pirint Sub Command1_Click() Text1．Text="Visual Basic" End Sub Private Sub Text LostFocus() If

admin2017-04-25  77
问题 设有如图所示窗体和以下程序：
    Pirint Sub Command1_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
解析 本题考查控件属性和事件过程。单击Command1命令按钮，执行命令按钮的Click事件过程，在Command1的Click事件过程中，设置文本框的Text1．Text属性为“Visual Basic”。同时，由于鼠标从文本框移动到命令按钮，文本框失去焦点，触发文本框的LostFocus事件，在该事件代码里面，判断文本框内容是否为“BASIC”，由于在前面的Command1的事件过程中设置了文本框的Text属性为“Visual Basic”，和“BASIC”不相等，因此该if判断条件成立，接下来把文本框的Text清空，并设置文本框获取输入焦点。
转载请注明原文地址:https://www.kaotiyun.com/show/6FGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)