单选题 窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序 　　Private Sub Commandl_Click() 　　Dim n 　　If Text1.Text<>"23456" Then 　　n=n+1 　　Print "口令输入错误" & n & "次" 　　End If 　　End Sub