在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocus( )If Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入字符"abc"之后，单击命令按钮，结果为()A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示
在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：
Private Sub Text1_LostFocus( )
If Not IsNumeric(Text1) Then
MsgBox "帐号有非数字字符错误"
Text1.Text = ""
Text1.SetFocus
else
MsgBox "帐号正确"
End If
End Sub
当在text1文本框中输入字符"abc"之后，单击命令按钮，结果为()
A.显示对话框，提示信息为"帐号正确"
B.显示对话框，提示信息为"帐号有非数字字符错误"
C.程序出错
D.没有任何提示
相关考题：
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，编写如下事件过程：Private Sub Command1_Click()Dim x As Integer,y As Integer,z As IntegerCall f(x,y,z)End SubSub f(a As Integer,b As Integer,c As Integer)c=b*aEnd Sub打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click() m=2.17 n=Len(Str$(m)＋Space(5)) Me!Text1=n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示______。A．5B．8C．9D．10
在窗体上面显示一个名称为Text1的文本框和一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click() Text1.Text="Visual" ME．Text1="Basic" Text1="Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是______。A．VisualB．BasicC．ProgramD．出错
设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 30B. 25C. 20D. 15
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。
（ 32 ） 在窗体上添加一个命令按钮 （ 名为 Command1 ） 和一个文本框 （ 名为 Text1 ） ， 并在命令按钮中编写如下事件代码：Private Sub Command1_Click( )m=2.17n=Len(Str$(m)+Space(5))Me!Text1 =nEnd Sub打开窗体运行后，单击命令按钮，在文本框中显示A ） 5B ） 8C ） 9D ） 10
在窗体上添加一个命令按钮Command1和一个文本框Text1，并在命令按钮的Click事件过程中编写如下代码： Private Sub Command1_Click（) A = 1.2 C = Len（Str$（A) + Space（10)) Text1.Text = C End Sub 程序运行后，单击命令按钮，在文本框中显示（）。A．3B．8C．14D．10