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

9 查阅

设有如右图所示的窗体和下列程序：

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事件。

计算机二级