窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序Private Sub Command1_click()Dim 11If Textl．Text”123456”Thenn=n+1print“口夸输入错误”＆n＆次”End IfEnd Sub希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是A．在Dim n语句的下面添加一句：n=OB．把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”+n+“次”C．把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”＆Str(n)＆“次”D．把Dim n改为Static n
窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序
Private Sub Command1_click()
Dim 11
If Textl．Text<>”123456”Then
n=n+1
print“口夸输入错误”＆n＆次”
End If
End Sub
希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是
A．在Dim n语句的下面添加一句：n=O
B．把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”+n+“次”
C．把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”＆Str(n)＆“次”
D．把Dim n改为Static n
相关考题：
在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。程序运行后， Command1 为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load（）Command1 Enabled=FalseEnd SubPrivate Sub Text1_ ________ （）Command1 Enabled=TrueEnd Sub
（ 7 ） 在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框 。 程序运行后 ， Command 1为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load()Command1.Enabled = FalseEnd SubPrivate Sub Text1_ 【 7 】 ()Command1.Enabled = TrueEnd Sub
设窗体上有一个文本框Text1和一个命令按钮Command1，并有下列事件过程： Private Sub Command1_Click() Dim s As String，Ch As String s="" For k=1 To Len(Text1) ch=Mid(Text1，k，1) s=ch+s Next k Text1.Text=s End Sub 程序执行时，在文本框中输入“Basic”，然后单击命令按钮，则Text1中显示的是( )。A．BasicB．cisaBC．BASICD．CISAB
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求程序运行时，单击命令按钮(如图1所示)，就可以把文本框中的内容写到文件Out．txt中，每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是（ ）。
在窗体上有一个名称为Command1的命令按钮，并有如下程序：程序执行时，单击命令按钮Command1三次后，窗体上显示的结果为（ ）。A. 5 16B. 5 6C. 15 15D. 15 6
（ 24 ）窗体上有一个 Text1 文本框，一个 Command1 命令按钮，并有以下程序Private Sub Commandl_Click （）Dim nIf Text1.Text " 23456 " Thenn=n ＋ 1Print " 口令输入错误 " n " 次 "End IfEnd Sub希望程序运行时得到左图所示的效果，即：输入口令，单击 “ 确认口令 ” 命令按钮 ， 若输入的口令不是 “ 123456 ” ，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是A ）在 Dim n 语句的下面添加一句： n=OB ）把 Print " 口令输入错误 " n " 次 " 改为 Print " 口令输入错误 " +n+ " 次 "C ）把 Print " 口令输入错误 " n " 次 " 改为 Print " 口令输入错误 " Str ( n ) " 次 "D ）把 Dim n 改为 Static n
窗体上有一-个Text1文本框，一个Command1命令按钮，并有以下程序：Private Sub Command1 Click（ ） Dim n If Text1．Text"123456"Then n=n+1 Print"口令输入错误”＆n＆”次" End If End Sub希望程序运行时得到左图所示的效果，即：输入口令，单击“确定口令’’命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是（ ）。A.在Dim n语句的下面添加一句：n=0B.把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”+n+“次”C.把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”＆Str(n)＆“次”D.把Dim n改为Static n