首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件vbsj5.vbp(相应的窗体文件为vbsii5.frm)。窗体Form1上有两个名称为Labl和Lab2的标签,它们的标题分别为“密码"和“允许次数”;一个名称为Cmd1的命令按钮,其标题为“确定”;两个名称分别为Txt1和T
在考生文件夹中有一个工程文件vbsj5.vbp(相应的窗体文件为vbsii5.frm)。窗体Form1上有两个名称为Labl和Lab2的标签,它们的标题分别为“密码"和“允许次数”;一个名称为Cmd1的命令按钮,其标题为“确定”;两个名称分别为Txt1和T
admin
2017-09-22
57
问题
在考生文件夹中有一个工程文件vbsj5.vbp(相应的窗体文件为vbsii5.frm)。窗体Form1上有两个名称为Labl和Lab2的标签,它们的标题分别为“密码"和“允许次数”;一个名称为Cmd1的命令按钮,其标题为“确定”;两个名称分别为Txt1和Txt2的文本框。其中Txt1用来输入密码(输入时显示“*”),无初始内容,Txt2的初始内容为3。已给出了Cmdl的事件过程,但不完整,要求去掉程序中的注释符“*”,把程序中的问号“?”改为正确内容,使得在运行时,在Txt1中输入密码后,单击“确定”按钮,如果输入的是“123456”,则在Txt1中显示“密码正确”如图3-66所示;如果输入其他内容,单击“确定”后,弹出如图3.67所示的错误提示对话框,并且Txt2中的数字减1。最多可输入3次密码,若3次输入错误,则禁止再次输入。
程序源码:
Private Sub Cmdl_Click()
’ If?="1234 56"Then
Txt1.Text="密码正确"
’ Txt1.?=""
Else
Txt2.Text=Txt2.Text-1
’ If Txt2.Text> ?Then
MsgBox"第"&(3-Txt2.Text)&"
次密码错误,请重新输入”
Else
MsgBox"3次输入错误,请退出"
’ Txt1.Enabled=?
End If
End If
End Sub
选项
答案
步骤1:打开考生文件夹中的本题工程文件vbsi5.vbp,将文本框Txt1的PasswordChar属性值设置为“*”。 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: If Txt1.Text="123456"Then Txt1.PasswordChar="" If Txt2.Text>0 Then Txt1.Enabled=False 步骤3:按要求将文件保存至考生文件夹中。
解析
根据题目源程序,判断文本框Txt1输入的密码是否为“123456”的条件表达式为:Txt1.Text="123456";要去掉对文本框中输入内容的屏蔽,需将其PasswordChar属性值清空,即执行语句:Txt1.PasswordChar="";每输入一次错误密码,文本框Txt2中的数字减1,当文本框Txt2中数值还大于0时,提示重新输入,否则提示错误,并禁用文本框Txt1。
转载请注明原文地址:https://www.kaotiyun.com/show/qjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是
在窗体上有一个命令按钮Command1,编写如下程序:PrivateSubCommand1_Click()Printpp1(3,7)EndSubPublicFunctionpp1(xAsSingle
下列语句的输出结果是【】。PrintFormat(Int(12345.6789*100+0.5)/100,"0000,0.00")
随机文件使用Put语句写数据,使用【】语句读数据。
启动窗体在【】对话框中指定。
随机试题
自动变速器的基本组成,由液力变矩器、齿轮变速机构、液压控制系统、电子控制系统、冷却与滤清装置等几个大部件构成。()
《谈“流浪汉”》一文对流浪汉的诠释不包括()
相位编码是通过施加梯度场,使不同位置磁矢量的___________不同而进行编码定位
不属于药品类易制毒化学品的药品是
根据《产品质量法》的规定,产品内在质量的要求包括()。
高级会计师资格实行全国统一考试制度。()
根据规定,会员制期货交易所理事会行使的职权包括()。
享受高新技术企业优惠的条件之一,是高新技术产品(服务)收入占企业当年总收入的比例不得低于()。
受政策法规影响较大的企业,其风险较小。()
声音与视频信息在计算机内的表现形式是()。
最新回复
(
0
)