首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标签L1和L2,标题分别为“口令”和“允许次数”;一个命令按钮C1,标题为“确定”;两个文本框名称分别为Text1和Text2。其中Text1用来输入口令(输入时,文本框内容显示“*”),初始内容
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标签L1和L2,标题分别为“口令”和“允许次数”;一个命令按钮C1,标题为“确定”;两个文本框名称分别为Text1和Text2。其中Text1用来输入口令(输入时,文本框内容显示“*”),初始内容
admin
2016-06-23
29
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标签L1和L2,标题分别为“口令”和“允许次数”;一个命令按钮C1,标题为“确定”;两个文本框名称分别为Text1和Text2。其中Text1用来输入口令(输入时,文本框内容显示“*”),初始内容为空;Text2的初始内容为3。并给出了C1的事件过程,但不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容,使得程序运行时,在Text1中输入口令后,单击“确定”,如果输入的是“123456”则在Text1中显示“口令正确”;如果输入其他内容,单击“确定”后,弹出错误提示对话框(如图所示),并且Text2中的数字减1。最多可输入3次口令,若3次都输入错误,则禁止再次输入。
注意:不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件,将文本框Textl的Password Char属性设置为“水”。 步骤2:打开代码编辑窗口,去掉程序中的注释符,将问号改为正确的内容。 参考代码(画下划线部分是需填入的内容) Private Sub C1_Click() If
Text1.Text
="123456"Then’输入的口令与正确的口令相比较 Text1.Text="口令正确" Text1.
PasswordChar
="" Else Text2.Text=Text2.Text-1’当密码错误时Text2中的数减1 If Text2.Text>
0
Then MsgBox"第"&(3-Text2.Text)&"次口令错误,请重新输入" Else MsgBox"3次输入错误,请退出" Text1.Enabled=
False
’当Text1的Enabled属性为false时则文本不能输入 End If End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/aCJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下一个函数过程:FunctionFun(aAsInteger)StaticC b=0:b=b+1:c=c+1 Fun=a+b+cEndFunction在窗体上添加一个命令按钮,事件过程如下:
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dima s=0:j=1 a=Array(1,2,
有如下程序:PrivateSubForm_Click() E=1:F=1 Forj=1To3 E=E+F:F=F+E Next PrintE:FEndSub该程序的
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dima(5,5) Fori=1To3 Forj=1To4
执行以下Commaand1的Click事件过程在窗体上显示()。OptionBase0PrinvateSubCommand1_Clcik()Dimaa=Array("a","b","C","d","e","
以下关系表达式中,其值为假的是
在下列关于二叉树的叙述中,正确的一项是
在Visual:Basic的立即窗口内输入以下语句:X=65<CR>PrintChr$(x)<CR>在窗口中显示的结果是
与数学表达式对应的,VisualBasic表达式是______。
随机试题
商业银行制衡有效的公司治理组织架构至少包括()。
操作系统探测技术主要包括:获取标识信息探测技术、基于____________协议栈的操作系统指纹探测技术和ICMP响应分析探测技术。
何谓前馈?
关于无排卵型功血的治疗,下列哪种说法是不正确的
下列哪项可引起金属音调咳嗽
A.面部白色B.面部黄色C.面部赤色D.面部青色E.面部黑色主虚证、湿证的为()。
为了保证公示效果,及时了解和充分吸收社会意见,可以重点在审批项目建议书前,或在批复项目建议书后、上报可行性研究报告前进行公示,公示期限一般不应少于()个工作日。
以下各因素中,能够提高股东权益净利率的因素有()。
判断下列级数的收敛性:.
Questions28-30ChoosetheappropriatelettersA-Dandwritetheminboxes28-30onyouranswersheet.*
最新回复
(
0
)