- 1、本文档共3页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
vbvb期末考试实验答案作业
请参考10_2.exe程序的运行结果,新建一个工程,完成调色板程序的设计,该程序由红绿兰三原色进行调色,如果预览满意,单击应用按钮,将调好的颜色作为文本框中文字的颜色。将完成后的工程文件以Design.Vbp、窗体文件以Design.frm保存到D:\10_2目录下。
具体要求如下:1. 应用程序界面设计参考图示。
??? 2. 要求水平滚动条和颜色成分输入文本框分别采用控件数组实现。3. 要求操作任意一个滚动条,都会在相应的文本框中显示该颜色成分的当前取值,并且动态改变预览框中长方形的颜色。[注意:滚动条最大值为 255]4. 要求在任意一个颜色成分输入文本框中输入一个0-255的数据,相应的滚动条的滑块都会移到正确的位置上,并且预览框中长方形的颜色也随之而调整。5. 单击应用按钮后将调好的颜色作为文本框中文字的颜色。
思考题:拖动滚动条时有没有触发滚动条的Change事件?
提示:
1. 应用程序界面设计参考图示。
程序界面右下角的预览框架里的长方形是形状控件Shape1(工具箱中的),将其FillStyle属性设置为0。
2. 要求水平滚动条和颜色成分输入文本框分别采用控件数组实现。
三个滚动条的Min设为0,Max设为255;三个文本框的Text属性设为空字串。
3. 要求操作任意一个滚动条,都会在相应的文本框中显示该颜色成分的当前取值,并且动态改变预览框中长方形的颜色。
颜色是利用Rgb(r,g,b)函数来表示,其中r,g,b是红、绿、兰颜色的饱和度,分别通过滚动条来控制。
Private Sub HScroll1_Change(Index As Integer)??? Text1(Index).Text = HScroll1(Index).Value??? Shape1.FillColor = RGB(HScroll1(0).Value, HScroll1(1).Value, HScroll1(2).Value)End Sub4. 要求在任意一个颜色成分输入文本框中输入一个0—255的数据,相应的滚动条的滑块都会移到正确的位置上,并且预览框中长方形的颜色也随之而调整。
设计文本框的Change事件:Private Sub Text1_Change(Index As Integer)??? HScroll1(Index).Value = Val(Text1(Index).Text)End Sub
5. 单击“应用”按钮后将调好的颜色作为文本框中文字的颜色。
Text2.ForeColor = Shape1.FillColor
下载10_1.exe
请参考10_1.exe程序的运行结果,新建一个工程,完成过程练习程序的设计,并将工程文件以Design.Vbp、窗体文件以Design.frm保存到D:\10_1目录下。
具体要求如下:1. 各题必须按要求用通用过程或函数过程进行编程。2. 第一题:编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!);其中m=n;m和n从键盘输入。3. 第二题:编写一个求1+2+……+n的函数Sum(n),利用该函数计算1+(1+2)+(1+2+3)+……+(1+2+……+100)的和。4. 第三题:编写一个三个数中求最大数的函数过程Max(x,y,z)。随机产生7个[0,50]之间的整数,然后用这个函数过程分别求出前三个数的最大值、前五个数的最大值以及这七个数中的最大值。5. 第四题:编写一个每行可以打印5个下标变量的打印数组的通用过程,。随机产生一个[100,500]、有20个下标变量的数组,调用该通用过程打印出原始数据;再将该数组中的偶数组成一个新的数组,再调用该通用过程打印出偶数数组。
思考题:通用过程与函数过程的区别?
提示:
1. 各题必须按要求用通用过程或函数过程进行编程。2. “第一题”:编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!);其中m=n;m和n从键盘输入。
阶乘自定义函数F(n)的编写参考上课讲义
计算二项式系数Cmn可以通过调用F(n)函数完成:cmn=F(m)/(F(n)*F(m-n))
???3. “第二题”:编写一个求1+2+……+n的函数Sum(n),利用该函数计算1+(1+2)+(1+2+3)+……+(1+2+……+100)的和。
自定义函数Sum(n)的编写:
Function Sum(n As Integer) As Long??? ……? 编写s=1+2+...+n的程序段??? Sum=s 将计算结果赋值给函数名End Function
计算1+(1+2)+(1+2+3)+……+(1+2+……+100
您可能关注的文档
- 233平面向量的坐标运算教案.doc
- 232平面向量正交分解及坐标表示(教学案).doc
- 234平面向量共线的坐标表示学案(人教A版必修4).doc
- 23《登上地球之巅》导学案.doc
- 23-达州市2011年中考物理试题.doc
- 23课《登上地球之巅》导学案.doc
- 25太阳是大家的教学设计.docx
- 25道shell面试题.docx
- 26“红领巾教学设计.doc
- 22-人教新课标数学七年级《探索直线平行的条件》教学设计之二.doc
- 福建省宁德市(新版)2024小学语文统编版小升初质量检测(巩固卷)完整试卷(含答案).docx
- 福建省三明市(新版)2024小学语文苏教版小升初考试(自测卷)完整试卷(含答案).docx
- 福建省宁德市(新版)2024小学语文苏教版小升初模拟(冲刺卷)完整试卷(含答案).docx
- 福建省南平市(新版)2024小学语文部编版小升初测试(拓展卷)完整试卷(含答案).docx
- 福建省三明市(新版)2024小学语文苏教版小升初核心能力评测(备考卷)完整试卷(含答案).docx
- 福建省莆田市(新版)2024小学语文人教版小升初核心能力评测(冲刺卷)完整试卷(含答案).docx
- 福建省厦门市(新版)2024小学语文部编版小升初真题(巩固卷)完整试卷(含答案).docx
- 甘肃省陇南市(新版)2024小学语文统编版小升初质量检测(冲刺卷)完整试卷(含答案).docx
- 福建省莆田市(新版)2024小学语文部编版小升初摸底(预测卷)完整试卷(含答案).docx
- 福建省泉州市(新版)2024小学语文部编版小升初质量检测(综合卷)完整试卷(含答案).docx
最近下载
- 2023-2024学年北京市北京师范大学附属实验中学高二上学期12月月考物理试卷含详解.docx VIP
- 新教科版小学科学四年级上册2.1《感受我们的呼吸》教学设计.docx
- 2021年秋新苏教版五年级上册科学全册教学课件.pptx
- 2024全国青少年“学宪法讲宪法”知识竞赛试题(附含答案).pdf
- 2024年养老护理职业技能大赛:为外伤出血老年人包扎止血实操流程讲解.docx
- 部编版《道德与法治》四年级下册第12课《家乡的喜与忧》教学课件(第1课时).pptx
- 学前教育学第七讲学前教育课程郑玉莲博士副教授贵州师范学院教育科学学院学习目标.ppt
- 外研版初二英语上册知识点总结 .doc VIP
- 《手术室植入物管理规范》(TCAME 65-2024).pdf VIP
- 《运动损伤与康复》课程教学大纲.docx VIP
文档评论(0)