首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个Text1文本框和一个Command1命令按钮。程序的功能是在文本框中输入密码后单击命令按钮则进行密码确认,若密码正确,弹出信息框显示"密码正确",若密码错误,弹出信息框显示"密码错误,请重新输入",但最多允许输出3次,若还不正确,则弹出信息框
窗体上有一个Text1文本框和一个Command1命令按钮。程序的功能是在文本框中输入密码后单击命令按钮则进行密码确认,若密码正确,弹出信息框显示"密码正确",若密码错误,弹出信息框显示"密码错误,请重新输入",但最多允许输出3次,若还不正确,则弹出信息框
admin
2015-06-30
69
问题
窗体上有一个Text1文本框和一个Command1命令按钮。程序的功能是在文本框中输入密码后单击命令按钮则进行密码确认,若密码正确,弹出信息框显示"密码正确",若密码错误,弹出信息框显示"密码错误,请重新输入",但最多允许输出3次,若还不正确,则弹出信息框显示"密码错误,不能再输入",且命令按钮变为无效。某人编写了如下程序:
Private Sub Command1_Click()
Dim num As Integer
num = num + 1
If Text1.Text = "123456" Then
MsgBox "密码正确"
ElseIf num = 3 Then
Command1.Enabled = False
MsgBox "密码错误,不能再输入"
Else
MsgBox "密码错误,请重新输入"
End If
End Sub
调试时发现有错误需要修改,下面正确的修改方案是
选项
A、把ElseIf num = 3 Then 改为ElseIf num >3 Then
B、把Command1.Enabled = False 改为Command1.Enabled = True
C、把Dim num As Integer 改为Static num As Integer
D、把num = num + 1 改为 num = num + 3
答案
C
解析
变量,,dim定义的变量称为"自动变量",当引用Dim定义变量时,变量值会被重新设置(数值变量重新设置为0,字符串变量被设置为空)。也就是说,下次再使用此变量,其值为初始值;而static定义变量,每次运用该静态变量后,其值会继续保留,作为下一次引用时该变量的初始值。每次运行Command1_Click()后,num的值都需保留,故选择D项。
转载请注明原文地址:https://kaotiyun.com/show/h0Qp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上有一个文本框控件,名称为TextTime,一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。PrivateSubTimer1TextTime.Text=TimeEndSub在
在新建一个VisualBasic工程时,将新建窗体的Name属性设置为TheFirst,则默认的窗体文件名为()。
设置复选框中或单选按钮的标题对齐方式的属性是______。
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()DimbAsIntegerb=b+1EndSub运行程序,三次单
若要求在文本框中输入密码时文本框中只显示#号,则应在此文本框的属性窗口中设置()
在面向对象方法中,信息隐蔽是通过对象的【】性来实现的。
栈的基本运算有三种:入栈、退栈和【】。
下列叙述正确的是
下列语句用来设置窗体Forml的属性,其中在运行时不能正确操作的语句是
在软件工程中,白箱测试法可用于测试程序的内部结构。此方法将程序看做是
随机试题
小儿指纹到达命关属于
可摘局部义齿的美学原则不包括下列哪项
某正弦电流则该电流有效值相量=()。
负债筹资的渠道主要有( )。
信息管理手册的主要内容()。
持有可转换公司债券的投资者,若其持有的可转换公司债券全部转为股本与其持有的该公司的股份的合计数,占公司已发行的股份与全部可转换公司债券转为股本的合计数达5%以上,以后每增加或减少1%,或上述比例达到30%以上,该投资者应按中国证监会的有关规定履行信息披露义
从2008年4月24日起,基金买卖股票按照()的税率征收印花税。
显示器、打印机和绘图仪都属于常用的计算机输入设备。()
通常所说的I/O设备指的是()。
Ofalltheareasoflearningthemostimportantisthedevelopmentofattitudes.Emotionalreactionsaswellaslogicalthought
最新回复
(
0
)