首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,含三个窗体,标题分别为“启动”、“注册”、“登陆”,程序运行时显示“启动”窗体,单击窗体上按钮时弹出对应窗体进行注册或登录。 注册信息放在全局数组users中,注册用户数(小于或等干10个)放在全局变量
在考生文件夹下有一个工程文件sjt5.vbp,含三个窗体,标题分别为“启动”、“注册”、“登陆”,程序运行时显示“启动”窗体,单击窗体上按钮时弹出对应窗体进行注册或登录。 注册信息放在全局数组users中,注册用户数(小于或等干10个)放在全局变量
admin
2018-06-29
22
问题
在考生文件夹下有一个工程文件sjt5.vbp,含三个窗体,标题分别为“启动”、“注册”、“登陆”,程序运行时显示“启动”窗体,单击窗体上按钮时弹出对应窗体进行注册或登录。
注册信息放在全局数组users中,注册用户数(小于或等干10个)放在全局变量n中(均已在标准模块中定义)。
注册时用户名不能重复,且“口令”与“验证口令”必须相同,注册成功则在“启动”窗体的标签中提示“注册成功”,否则提示相应错误信息。登录时,检验用户名和口令,若正确,则在“启动”窗体的标签上提示“登录成功”,否则提示相应错误信息。
标准模块中函数finduser的功能是:在users数组中搜索用户名(参数ch),找到则返回该用户名在users中的位置,否则返回0。
文件中已经给出了所有控件和程序,但程序小完整,请去掉程序中的注释符,把Form2、Form3窗体文件中的?改为正确的内容。
注意:不得修改已经仵在的程序和控件的属性;最后,程序按原文件名存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案 ’Form2窗体代码 Private Sub Command1_Click()’清空重置 Text1="" Text2="" Text3="" End Sub Sub writeusers()’向数组users中写入新用户信息 n=n+1’用户数目自增 users(n,1)=Text1’保存用户的用户名、密码 Users(n,2)=Text2 End Sub Private Sub Command2_Click() If Text1=""Then MsgBox("必须输入用户名!") Text1.SetFocus ’Text1重新获得焦点 Elself finduser(Trim$(Text1))>0 Then ’如找到相同名,则返回位置一定大于0 MsgBox("此用户名已经存在!") ElseIf Text2<>Text3 Then’比较口令与验证口令是否相同 MsgBox("口令验证错误!") Else writeusers Form1.Label1="注册成功!" ’当注册成功后Label1显示成功信息 Form2.Hide End If End Sub ’Form3窗体代码 Private Sub Command1_Click() k=finduser(Trim$(Text1)) If k=0 Then ’验证用户名是否存在 MsgBox("没有注册!") ElseIf Trim $(Text2)<>usems(k,Z)Then ’验证输入的密码是否正确 MsgBox("口令错误!") Else Form1.Label1.Caption="登录成功!" Form3.Hide End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
因为本题的窗体比较多,含有一个模块,所以首先要理清思路,了解每一个窗体的功能。窗体1是启动界面,可以选择登录或者注册,窗体2是注册窗口实现用户的注册,窗体3是登录窗口实现用户的登录,模块中函数的功能是在数组中寻找用户名,并返回其所在的位置。理清了各个窗体和模块的关系,就可以开始分析并编写代码了。
转载请注明原文地址:https://kaotiyun.com/show/ddGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要想使列表框只允许单选列表项,应设置的属性为()。
下面不能在信息框中输出“VB”的是()。
窗体上有两个水平滚动条HV、HT,还有一个文本框Textl和一个标题为“计算”的命令按钮Commandl,并编写了以下程序:PrivateSubcommandl_Click()Callcale(HV.Value,HT.Value)End
在菜单编辑器中建立如下图所示的菜单,并为了每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是()。
执行语句DimX,YAsInteger后,()。
在软件开发中,需求分析阶段可以使用的工具是()。
对于含有多个窗体的工程而言,以下叙述中正确的是
把数学表达式2y-6表示为正确的VB表达似乎应该是
在考生文件夹中有一个工程文件sjt5.vbp,如图6所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签|b|First中;同时计算矩阵主对角线的元素之和,计算结果显
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
随机试题
MRI诊断价值相对较低的疾病是
关于诉前权利保全应符合的条件表述错误的是()
______attemperaturesabove1,250°C,clayfusesandbecomesnonporousstonewareorporcelain.
人工成本包括的内容有()。
市场营销数据库对于高质量地完成直复营销活动,具有的优势有()。
如图6(a)所示,圆形线圈P静止在水平桌面上,其正上方悬挂一相同的线圈Q,P和Q共轴,Q中通有变化电流,电流随时间变化的规律如图6(b)所示,P所受的重力为G.桌面对P的支持力为N,则()。
感觉对比,是指同一感受器接受不同刺激而使得感受性发生变化的现象。下列属于感觉对比范畴的是()。
[*]
Whendoesthesongbirdperformatapdance?
Americansbelievethatindividualsmustlearnto【B1】_______themselvesorrisklosingfreedom.Thismeansachievingbothfinanci
最新回复
(
0
)