在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：
Private Sub Command1_Click( )
Dim I As Integer
If Text1.Text <> 'Gong' Then
I = MsgBox('密码错误', 5 + vbExclamation, '输入密码')
If I <> 4 Then
End
Else
Text1.Text = ''
Text1.SetFocus
End If
Else
MsgBox '密码帐号正确!'
End If
End Sub
若在text1中输入字符串'Gong'，则程序运行结果为()

A.Text
B.Text
C.SetFocus
End
D.显示对话框，提示'密码帐号正确!'
B.显示对话框，提示'密码错误'
C.程序出错
D.没有任何提示