2002秋vb上机(3)
更新时间:2023-10-26 17:46:01 阅读量: 综合文库 文档下载
江苏省高等学校非计算机专业学生
计算机基础知识和应用能力等级考试上机试卷(2002年秋)
二级 Visual Basic 语言(试卷代号VB03)
(本试卷完成时间 70分钟)
[试卷须知]
1. 改错题的界面不作要求,主要用来调试程序,若题目中有参考界面,则仅供参考; 2. 考试结束后,文件必须存放在指定位置,否则适当扣分;考试盘中若无指定文件,则不予评分;
3. 程序代码书写应呈锯齿形。 一、改错题(17分)
[题目]所谓的完全数是一个整数N的因子和(不包括N)等于N。例如6=1+2+3,6是完全数。编写程序验证;两位以上的完全数,把它们的各位数字加起来得到一个数,再把这个数的各位数字加起来又得到一个数,一直做下去,直到得到一个一位数,这个数是1。过程WanShu的功能是找完全数。
Option Explicit
Private Sub Command1_Click()
Dim I As Integer, K As Integer, St As String For I = 10 To 500 If Wanshu(I) Then St = CStr(I)
text1.Text = text1.Text & St Call Test(St)
text1.Text = text1.Text & Chr(13) & Chr(10) End If
Next I End Sub
Private Function Wanshu(N As Integer) As Boolean Dim I As Integer, sum As Integer For I = 1 To N – 1 If N Mod I = 0 Then sum = sum + I End If Next I
If sum = N Then Wanshu = True End Function
Private Sub Test(S As String) Dim I As Integer, sum As Integer sum = 0
Do While Len(S) > 1 For I = 1 To Len(S)
sum = sum + Val(Mid(S, I, 1)) Next I
text1.Text = text1.Text & \S = Str(sum) Loop End Sub [要求]
1. 新建工程,输入上述代码,改正程序中的错误;
2. 该措时,不得增加或删除语句,但可适当调整语句的位置;
3. 将窗体文件和工程文件分别命名F1.frm和P1.vbp,并保存到软盘A的根目录下。 二、编程题(23分)
[题目]编程求下面多项式的值 Y=A0+A1X+A2X2+??+AnXn [编程要求]
1. 程序参考界面如图所示,编程时不得增加或减少界面对象或改变对象的种类,窗体及界面元素大小适中,且均可见;
2. 多项式次数从文本框输入,多项式系数An是随机生成的1~9之间的整数。计算多项式在自变量x依次取0,1,2,??,10时的值。多项式系数显示在图片框中。多项式自变量x的值与对应的多项式值按图示格式显示在列表框中;
3. 单击“计算”命令按钮,则运行程序;按“清除”按钮,则将文本框、图片框和列表框清空;按“结束”按钮,则结束程序运行; 4. 定义一个函数过程求多项式的值。 [要求]
将窗体文件和工程文件分别命名为F2.frm和P2.vbp,并保存到软盘A的根目录下。
正在阅读:
2002秋vb上机(3)10-26
2015潍坊二模打印版 山东省潍坊市2015届高三下学期二模考试数学(文)试题 Word版含答案08-20
互联网金融商业计划书01-14
妇联工作总结收集02-26
清史课后作业11-30
人教版高一英语必修Unit1_friendship全单元教案09-02
- 多层物业服务方案
- (审判实务)习惯法与少数民族地区民间纠纷解决问题(孙 潋)
- 人教版新课标六年级下册语文全册教案
- 词语打卡
- photoshop实习报告
- 钢结构设计原理综合测试2
- 2014年期末练习题
- 高中数学中的逆向思维解题方法探讨
- 名师原创 全国通用2014-2015学年高二寒假作业 政治(一)Word版
- 北航《建筑结构检测鉴定与加固》在线作业三
- XX县卫生监督所工程建设项目可行性研究报告
- 小学四年级观察作文经典评语
- 浅谈110KV变电站电气一次设计-程泉焱(1)
- 安全员考试题库
- 国家电网公司变电运维管理规定(试行)
- 义务教育课程标准稿征求意见提纲
- 教学秘书面试技巧
- 钢结构工程施工组织设计
- 水利工程概论论文
- 09届九年级数学第四次模拟试卷
- 上机
- 2002
- 山东省关于印发《 - 严肃市县乡换届纪律工作实施方案》 - 和《 - 严肃村两委换届纪律工作实施方案》 - 的通知
- Symbolism of the Rose in A Rose for Emily
- 陋室铭对比阅读 - 图文
- 半导体-硅片生产工艺流程及工艺注意要点 - 图文
- 外科手术学考试大纲 - 图文
- 儒教、道教、汉族丧葬习俗简述
- 《劳动经济学》复习题答案2016-6-14
- 大班科学《小蚂蚁了不起》活动设计
- 2总公司《技规》(普速铁路部分)第二编行车组织宣贯学习讲义(定稿)
- 2016.11.28月考VF试题
- 鸟的天堂的作业本答案
- 互联网对文学发展弊大于利四辩稿
- 苏州企业人力资源MMGG - 图文
- 高标准基本农田项目监理总结报告
- 三甲医院(三级甲等)建设标准新
- 中秋户外拓展新闻稿
- 2016-2022年中国第三方支付行业监测及投资趋势研究报告 - 图文
- 09级电路理论试题(A)
- 细菌性肺炎诊断要点
- 贺驼煤矿煤与瓦斯突出事故应急救援预案1