单选题
设有如图所示窗体和以下程序：
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按钮，则产生的结果是______。
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
【答案解析】[解析] 当单击命令按钮时，文本框失去焦点，触发LostFocus事件。在LostFocus事件中，字符串“Basic”与“BASIC”不等，执行If语句，清空文本框，并把焦点返回到文本框中。