2. 计算机
  3. 窗体上有一个Textl文本框，一个Cornmandl命令按钮，并有以下程序： Private Sub Commandl click() Dim n If Text1．Text＜＞“1 23456”Then n=n+1：Print“口令输入错误”＆n&”次”

窗体上有一个Textl文本框，一个Cornmandl命令按钮，并有以下程序： Private Sub Commandl click() Dim n If Text1．Text＜＞“1 23456”Then n=n+1：Print“口令输入错误”＆n&”次”

admin2015-12-09  34
问题 窗体上有一个Textl文本框，一个Cornmandl命令按钮，并有以下程序：
Private Sub Commandl click()
Dim n
If Text1．Text＜＞“1 23456”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、把Dinl n改为Static n
答案D
解析 本题中题干部分的程序之所以会产生不合要求的结果，其原因是在单击事件中的第一条语句为Dim n，这样的话每次单击按钮时触发此事件，都将会执行这条语句，重新定义一个局部变量n并设其默认初值为0。Static语句在过程级别中使用，用于声明变量并分配存储空间，在整个代码运行期间都能保留使用Static语句声明的变量的值，因此此处应该使用Static n来声明变量。
转载请注明原文地址:https://kaotiyun.com/show/YfLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)