首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp,包含2个窗体,名称分别为Form1、Form2。窗体上已有部分控件,请在Form1窗体上再添加1个名称为Text1的文本框,Text属性为空,Enable属性设置为False(如图所示),输入字符时文本框内将显
在考生文件夹下有一个工程文件sjt3.vbp,包含2个窗体,名称分别为Form1、Form2。窗体上已有部分控件,请在Form1窗体上再添加1个名称为Text1的文本框,Text属性为空,Enable属性设置为False(如图所示),输入字符时文本框内将显
admin
2015-08-12
56
问题
在考生文件夹下有一个工程文件sjt3.vbp,包含2个窗体,名称分别为Form1、Form2。窗体上已有部分控件,请在Form1窗体上再添加1个名称为Text1的文本框,Text属性为空,Enable属性设置为False(如图所示),输入字符时文本框内将显示字符“*”。
程序功能如下:
①单击Form1窗体的“输入密码”按钮,则Text1文本框Enable属性变为True,且获得焦点。
②输入密码后单击Form1窗体的“密码校验”按钮,则判断Text1中输入内容是否为小写字符“abc”,若是,则Form1窗体消失,显示Form2窗体;若密码输入错误,则提示重新输入,若三次密码输入错误,则退出系统。
③单击Form2窗体的“返回”按钮,则form2窗体消失,显示。Form1窗体。
Form2窗体的控件和程序已给出,但Form1窗体的程序不完整,请将程序中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序。最后,程序将按照原文件名进行存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,添加一个名称为Text1的文本框,初使文本内容为空,Enabled属性设置为False,并将其PasswordChar属性设置为“*”。 步骤2:分析并编写程序代码。 程序提供代码如下: 窗体1的代码 Dim n As Integer Private Sub Command1_Click() Text1.Enabled=? Text1.SetFocus End Sub Private Sub Command2_Click() If Text1.Enabled=False Then MsgBox"请先使用‘输入密码’功能!" Else ’If Text1<>"?"Then n=n+1 ’If?=3 Then MsgBox"三次密码输入错误,你无权进入本系统!" End Else MsgBox"第"+Str(n)+"次密码输入错误,请重试!" Text1="" Text1.SetFocus End If Else Text1.Enabled=False Text1="" ’?.Hide ’?.Show End If End If End Sub 窗体2的代码 Private Sub Command1_Click() Form2.Hide Form1.Show End Sub 参考答案: 第1个?处填入:True 第2个?处填入:abc 第3个?处填入:n 第4个?处填入:Form1 第5个?处填入:Form2 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
根据题意,通过文本框的Name、Text、Enabled、PasswordChar属性设置文本框,单击“输入密码”按钮,Text的Enabled属性设置为True,并通过SetFocus方法使文本框获得焦点。
输入密码后单击Form1窗体的“密码校验”按钮,则判断Text1中输入内容是否为小写字符“abc”,若密码正确,通过Hide方法隐藏Form1窗体,并通过Show显示Form2窗体;若密码输入错误,则提示重新输入,变量n用于累积输入次数,三次密码输入错误,则退出系统。
转载请注明原文地址:https://kaotiyun.com/show/ISQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面关于多窗体程序设计描述不正确的是
以下控件可作为其他控件容器的是
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充
执行以下程序段,并输入1.23,则程序的输出结果应是【】。N=Str(InputBox("请输入一个实数:"))p=InStr(N,".")PrintMid(N,p)
在窗体上绘制一个名称为List1的列表框,一个名称为Labe11的标签,列表框中显示若干个项目。当单击列表框中的某个项目时,在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是
从键盘上输入两个字符串,分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是
设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框PrivateSubCommand1_Click()CDl.DialogTitle=“打开文件”CDl.InitDir=“C:\”CDl.Filter=“所有文件
在窗体上绘制两个命令按钮,名称分别为Commandl和Command2,标题分别为“输人”和“调换”,两个标签,名称为Labell和Label2、Caption属性为“调换前:”和“调换后:”,两个名称分别为Text1和Text2的文本框控件。请编写适当
随机试题
下列行为中,应受到反垄断法律制度规制的有()。
简述制度条件对行政组织的影响。
破坏动物下丘脑视上核和室旁核,可导致动物
一个3岁小儿测血压哪个结果是正常的
大脑中动脉血栓栓塞,栓子可能来源于
在债券质押式回购交易中,融资方是指在债券回购交易中( )的一方。
在发展自助小组时,社会工作者协助组员界定他们的共同需要,鼓励组员分享经验、释放情绪。在这里,社会工作者使用了()技巧。
素质教育就是要使教师成为学生的合作者、帮助者和服务者。
Bloomberg
Itwasquitealongtime______Irealizedwhathadhappenedtotheoldman.
最新回复
(
0
)