首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timerl的定时器,以及名称为Linel和Line2的两条水平直线。请用名称为Shapel的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timerl的定时器,以及名称为Linel和Line2的两条水平直线。请用名称为Shapel的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求
admin
2013-10-06
29
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timerl的定时器,以及名称为Linel和Line2的两条水平直线。请用名称为Shapel的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求:
①圆的顶端距窗体Forml顶端的距离为360;
②圆的颜色为红色(红色对应的值为&H000000FF&或&HFF&),如图2-13所示。
程序运行时,Shapel将在Linel和Line2之间运动。当Shapel的顶端到达Linel时,会自动改变方向而向下运动;当Shapel的底部到达Line2时,会改变方向而向上运动。
文件中给出的程序不完整,请去掉程序中的注释符,把程序中的?改为正确内容,使其实现上述功能。
注意:不能修改程序的其他部分和已给出控件的属性。最后将修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,包含了所有控件和部分程序,如图2-14所示。程序功能如下:
①单击”读数据”按钮,可将考生文件夹下in4.dat文件中的100个整数读到数组a中;
②单击”计算”按钮,则根据从名称为Combol的组合框中选中的项目,对数组a中的数据计算平均值,并将计算结果四舍五入取整后显示在文本框Textl中。”读数据”按钮的Click事件过程已经给出,请为”计算”按钮编写适当的事件过程实现上述功能。
注意:不得修改已经存在的控件和程序,在结束程序运行之前,必须进行一次计算,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
(1)步骤1:打开考生文件下的本题工程文件sjt3.vbp,在窗体上两条水平直线问画一个形状控件,并如表3-10设置其属性。 [*] 步骤2:在代码编辑窗口,去掉程序中的注释符”’“,将问号”?”改为正确的内容。 参考代码: Timer1.Enabled=True If Shape1.Top<=Linl.Y1 Then If Shape1.Top+Shape1.Height>=Lin2.Y1 Then 步骤3:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件中的本题工程文件sjt4.vbp,在代码编辑窗口,编写”计算”按钮的单击事件过程以及三个自定义过程。 参考代码: Private Sub Command2_Cl ick( ) Select Case Combol.ListIndex Case 0 Textl=even( ) Case 1 Textl=odd( ) Case 2 Textl=all( ) End se⊥ect End Sub Function even( ) Dim s As Single, n As Integer s=0 For k=1 To 1 00 If a(k) / 2 =Fix(a(k) / 2)Then s=s+a(k) n=n+ 1 End If Next s=s / n even=CInt(s) End Function Function odd( ) Dim s As Single, n As Integer s=0 For k=1 To 1 00 If a(k) / 2<>Fix(a(k) /2)Then s=s+a(k) n=n+ 1 EndIf Next s=s / n odd=CInt(s) End Function Function all( ) Dim s As Single, n As Integer s=0 For k=1 To 1 00 s=s+a(k) Next s=s / 1 00 all=CInt(s) End Function 步骤2:按要求将文件保存至考生文件夹中。 步骤3:按<F5>键运行程序,先单击”读数据”按钮,然后选择组合框中的一项再单击”计算”按钮,最后单击窗体右上角的关闭按钮结束程序。
解析
转载请注明原文地址:https://jikaoti.com/ti/ZO60FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为CommonDialog1的通用对话框和一个名为Command1的命令按钮。要求实现这样一个功能:单击命令按钮后,打开一个通用对话框用于保存文件,其窗口标题为“保存”,默认文件名为Data,在“文件类型”栏中显示*.txt。下列程序中能
要向DatA.dat文件中添加数据,下面语句中正确的是______。
下列程序段的执行结果为______。DimnAsIntegern=10Whilen<>0n=n-1WendPrint"n=";n
结构化系统设计阶段的目的是______。
在窗体上画一个名称为Labell的标签和一个名称为Listl的列表框。程序运行后,在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签Label中显示所选中的项目,如下图所示。请在______和______处填入适当的内容,将程序补充完整。Pr
如果改变窗体的BackColor属性,则改变了窗体的______。
深度为5的满二叉树有【】个叶子结点。
设有下列二叉树:对此二叉树前序遍历的结果为【】
随机试题
女性,26岁,既往月经规律,停经50天,近3天晨起呕吐,厌油食,伴有轻度尿频,仍坚持工作。可能的诊断是()。
设计信息检索时需要考虑的因素包括()。
根据有关规定,如果工程初步设计提出的总概算超过可行性研究报告总投资的()以上或其他主要指标需要变更时,应说明原因和计算依据,并重新向原审批单位报批可行性研究报告。
工程量清单计价的适用范围是()
“严师出高徒”、“棍棒底下出孝子”反映出人们选择教育方式受到()的影响。
对于价格低廉、经常购买、品牌差异小的产品,消费者不需要花时间进行选择,也不需要经过搜集信息、评价产品特点等复杂过程,因此其购买行为最简单。消费者只是被动地接收信息,出于熟悉而购买,也不一定进行购后评价。这种购买行为属于()。
阅读下列说明,回答问题1至问题3,将解答填入答题纸的对应栏内。【说明】某企业拟建设涉密数据中心,作为企业信息系统的运行中心、灾备中心,承载着企业的核心业务运营、信息资源服务、关键业务计算、数据存储和备份,以及确保业务连续性等重要任务。该项目已由承建单位
下列程序的输出结果是【】。#includeusingnamespacestd;classBase{public:intm,n;Base(inti,intj):m(i),n(j){}
Sincethereissuchanabundanceoffoodinthesea,itisunderstandablethatsomeoftheefficient,highlyadaptable,warm-blo
【S1】【S5】
最新回复
(
0
)