设有如右图所示的窗体和下列程序: Private Sub Command1_Click() Text1.Text="Visual Basic" End Sub Private Sub Text1_LostFocus()

admin2009-08-15  27

问题 设有如右图所示的窗体和下列程序:   

Private Sub Command1_Click()       Text1.Text="Visual Basic"    End Sub    Private Sub Text1_LostFocus()       If Text1.Text<>"BASIC" Then          Text1.Text=" "          Text1.SetFocus       End If    End Sub程序运行时,在Text1文本框中输入“Basic”(如图所示),然后单击Command1按钮,则产生的结果是(  )。

选项 A、文本框中无内容,焦点在文本框中
B、文本框中为"Basic",焦点在文本框中
C、文本框中为"Basic",焦点在按钮上
D、文本框中为"Visual Basic",焦点在按钮上

答案A

解析 本题考查的考点是有关事件执行过程的。由于先在文本框中输入数据,所以焦点在文本框中。当单击命令按钮时,首先应该执行文本框的LostFocus事件。本题中由于在文本框的LostFocus事件中执行到了Text1.Setfocus,所以焦点不能离开文本框,也就不执行命令按钮的Click事件。
转载请注明原文地址:https://kaotiyun.com/show/V01p777K
0

最新回复(0)