窗体上有一个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=0 B:把Print "口令输入错误" &n& "次" 改为Print "口令输入错误"+n+ "次" C:把Print "口令输入错误" &n& "次" 改为Print "口令输入错误"& Str(n)& "次" D:把Dim n改为Static n

变量定义语句Dim Index&与下面的______等价。 ( )

A:Dim Index As Long B:Dim Index As Integer C:Dim Index As Single D:Dim Index As Double

VBA中定义静态变量可以用关键字( )。

A:Const B:Dim C:Public D:Static

VBA中定义符号常量可以用关键字______。

A:Const B:Dim C:Public D:Static

VBA中定义局部变量可以用关键字( )。

A:Const B:Dim C:Public D:Static

窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序 Private Sub Command1_click( ) Dim 11 If Textl.Text$amp;n=n+1 print“口夸输入错误”&n&次” End If End Sub 希望程序运行时得到左图所示的效果,即:输入口令,单击“确认口令”命令按钮,若输入的口令不是“123456”,则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果,程序需要修改。下面修改方案中正确的是()

A:在Dim n语句的下面添加一句:n=0 B:把Print"口令输入错误"&n&"次"改为Print"口令输入错误"+n+"次" C:把Print"口令输入错误"&n&"次"改为Print"口令输入错误"&Str(n)&"次" D:把Dim n改为Static n

窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序   Private Sub Commandl_Click( )   Dim n   If Text1.Text<>"23456" 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

微信扫码获取答案解析
下载APP查看答案解析