首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹下的工程文件sjt3.vbp中有2个标题分别是“产生范文”和“结束”的命令按钮:2个名称分别为Text1和Text2,初始值为空的文本框。请再画1个名称为Label3、标题为“正确率”的标签,画1个名称为Text3、初始内容为空的文本框。效
(1)考生文件夹下的工程文件sjt3.vbp中有2个标题分别是“产生范文”和“结束”的命令按钮:2个名称分别为Text1和Text2,初始值为空的文本框。请再画1个名称为Label3、标题为“正确率”的标签,画1个名称为Text3、初始内容为空的文本框。效
admin
2018-07-11
53
问题
(1)考生文件夹下的工程文件sjt3.vbp中有2个标题分别是“产生范文”和“结束”的命令按钮:2个名称分别为Text1和Text2,初始值为空的文本框。请再画1个名称为Label3、标题为“正确率”的标签,画1个名称为Text3、初始内容为空的文本框。效果如图3.16所示。程序功能如下:
1)单击“产生范文”命令按钮,则在Text1文本框中随机产生由20个字母组成的范文。
2)用户可以在Text2文本框中依照范文输入相应字母,当输入字母达到20个之后,禁止向Text2输入内容,且在Text3文本框中显示输入的正确率。
3)单击“结束”命令按钮,则结束程序运行。
请将“产生范文”命令按钮的Click事件过程,以及Text2文本框的KeyPress事件过程中的注释符去掉,把“?”改为正确内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序。最后,程序按原文件名存盘。
(2)考生文件夹下的工程文件sjt4.vbp中已经定义了一个学生记录类型数据StudType。有3个标题分别为“准考证号”“姓名”和“总分"的标签;3个初始内容为空,用于接收准考证号、姓名和总分的文本框Text1、Text2和Text3;1个用于显示提示信恳的标签Label4。请再画1个含有3个命令按钮的控件数组,其名称为Cmdl,标题分别是“添加”“最高”和“结束”。效果如图3.17所示。
程序功能如下:
1)单击“添加”按钮,则将Text1、Text2和Text3文本框中输入的准考证号、姓名和总分等学生信息存入自定义的学生记录类型数组stu中,同时在Label4中显示已输入的学生人数。最多只能输入50个学生信息。
2)单击“最高”按钮,则在3个文本框中显示“总分”最高的学生记录,同时在Label4中显示该记录的位置。
请将命令按钮控件数组Cmd1的Click事件过程中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后,程序按原文件名存盘。
选项
答案
(1)步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在窗体上加入一个标签和文本框,按照表4.10设置相关属性。 [*] 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Text1=Text1+s Text2.Locked=True If Mid(Text2,i,1)=Mid(Text1,i,1) Then m=m+1 n=n+1 步骤3:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在窗体上加入一个命令按钮数组,按照表4一11设置相关属性。 [*] 步骤2:在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Select Case Index n=n+1 Max=stu(1).Total If stu(j).Total>Max Then maxi=j 步骤2:按要求将文件保存至考生文件夹中。
解析
(1)题目要求比较两个文本框内容的相似程度,比较方法是通过循环分别从两个文本框逐个取字母,然后逐个比较,如果相同则正确计数变量m的加1,否则错误计数变量n加1。循环结束后,便可根据m和n的值计算正确率。
(2)题目要求首先在窗体上添加一个命令按钮数组,具体方法是在窗体上添加第一个命令按钮之后,选择该命令按钮,然后使用“复制”和“粘贴”命令或快捷方式,创建第二个命令按钮,系统会提示是否创建控件数组,选择“是”便完成控件数组的建立,重复一次“粘贴”即可创建第三个命令按钮。
分析程序可知,在Cmdl的Click事件处理过程中,首先需要先判断当前点击的是哪一个命令按钮,这可以通过控件数组的index来来区分。题目要求最多只能输入50组数据,在第二个“?”处,If判断如果n没有超过50则n应该加1,保存当前有多少组数据;在case 1里面是查找最高的那组数据,使用For循环来查找,循环的起始条件是{=2,即搜索是从第二组数据开始的,变量Max记录最高分,而变量maxi记录最高分出现的位置,因此第三个“?”处给Max变量初始化,即赋值第一组数据的分值;如果当前的分数高于Max值,则更新Max和maxi的值。
转载请注明原文地址:https://kaotiyun.com/show/aKGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(37)设有以下程序:PrivateSubForm_Click()x=50Fori=lTo4Y=InputBox(“请输入一个整数”)Y=Val
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
设有以下定义语句:PrivateTypepointxAsIntegeryAsIntegerEndTVpeDimaAspoint下面语句中正确的是
设a=2,b=3,c=4,d=5,表达式Nota
命令按钮Command1的单击事件过程如下:PrivateSubCommand1_C1ick()Dima(10,10)AsIntegerx=0Fori=1To3Vorj=1To3a(i,j)=i*2Modj
执行语句DimX,YAsInteger后,
以下()控件没有Caption属性。
在数据库系统中,用于对客观世界中复杂事物的结构及它们之间的联系进行描述的是
(1)在考生目录下有一个工程文件sjt3.vbp,窗体文件中已给出所有控件和部分程序,如图所示。要求:①利用属性窗口设置适当的属性,使text1、text2中数据右对齐。②请编写适当的程序完成以下功能:在Text1中输入40
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为()。
随机试题
什么叫卷边?怎样卷边?
肥皂刷手法需刷至
男,80岁。高血压病史10余年,长期服用钙通道阻滞剂,1个月前因血压控制不满意加用美托洛尔25mgbid,近1周觉乏力、倦怠、间断黑曚。查体:BP110/70mmHg,心率50次/分,心律不齐,各瓣膜听诊区未闻及杂音。心电图示PR间期逐渐延长直至QRS波
温女士,34岁,l-1-0-2,行经腹输卵管结扎术,术后护理错误的是
省级商务部门及中央管理企业负责于每年4月1日至6月30日对所属企业的境外投资,按()进行综合绩效评价。
根据民事诉讼法及司法解释的规定,对于人民法院作出的下列哪些裁判,当事人不服的可以提出上诉?()
情景描述:某服装厂,共2层,层高为6m,每层建筑面积为4000m2,且每层划分为1个防火分区。该厂房的正北面是耐火等级为二级的4层铝粉厂房,层高为4.5m,正南面是耐火等级为二级的3层食用油仓库,西面是耐火等级为三级的2层印染厂,东面是耐火等级为二级的6层
材料:在外出旅游时,我们既会看到文人墨客的题字、题诗,又会看到游人“到此一游”式的涂鸦。教师提问:比较图1和图2,运用文化生活知识,分析文人墨客的题字、题诗与游人“到此一游”式涂鸦的区别。学生一:前者是一种文化创作,具有文化内涵,能保
被称为“书圣”的是()。
对“劳动是财富之父,土地是财富之母”这句话的正确解释是()
最新回复
(
0
)