窗体上有一个Textl文本框,一个Commandl命令按钮,并有以下程序: Private Sub Commandl_click() Dim n IfTextl.Text<>”123456”Then

admin2013-10-16  62

问题 窗体上有一个Textl文本框,一个Commandl命令按钮,并有以下程序:
    Private Sub Commandl_click()
         Dim n
         IfTextl.Text<>”123456”Then
             n=n+l:Print”口令输入错误”&n&”次”
         End If
    End Snb

    希望程序运行时得到左图所示的效果,即:输入口令,单击“确认口令”命令按钮,若输入的口令不是“123456”,则在窗体上显示输入错误口令的次数。但上而的程序实际显示的是右图所示的效果,程序需要修改。下面修改方案中正确的是(    )。

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

答案D

解析 本题中题干部分的程序之所以会产生不合要求的结果,其原因是在单击事件中的第一条语句为Dim n,这样的话每次单击按钮时触发此事件,都将会执行这条语句,重新定义一个局部变量n并设其默认初值为0。Static语句在过程级别中使用,用于声明变量并分配存储空间,在整个代码运行期间都能保留使用Static语句声明的变量的值,因此此处应该使用Static n来声明变量。
转载请注明原文地址:https://jikaoti.com/ti/W660FFFM
0

最新回复(0)