- 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
实验四循环结构程序分析报告(分析报告性)
实 ?验 ?报 ?告 学院: ???????????专业: ?????????年级: ????????2006 ??????姓名: ???????????学号: ???????????实验室号:_____ ???计算机号: ???????实验日期: ????年 ???月 ???日 指导教师签字: ???????????成绩: ??????????报告退发 (订正 、 重做) ???????????????实验四 ?循环结构程序设计(设计性)一、实验目的1、实验目的掌握:For语句的使用掌握:Do语句的各种形式的使用掌握:如何控制循环条件,防止死循环或不循环二、实验内容利用VB创建一个标准exe程序,程序用牛顿迭代法求方程2x3-4x2+3x-6=0的准确解x,程序界面包括两个文本框,两个按扭,两个标签控件.在第文本框text1内输入方程的初始点,在文本框text2内输出解.用户界面如图所示,并以4-1.frm和4-1.vbp为名分别将窗体文件和工程文件保存在d:\vb\4的目录下(本题要求采用循环语句来完成). 图4-1(2)利用VB创建一个标准exe程序,生成10个范围是1-10随机整数,并求解它们的最大值,最小值和平均值.程序界而如图所示,有四个label控件,3个文本框控件和2个按钮控件.要求程序运行时,点击”确定”按钮,就在label1控件上显示出10个随机生成的整数,并对这10个整数求最大值,最小值和平均值,分别显示在text1,text2和text3这三个框中.按退出按钮退出程序. 并以4-2.frm和4-2.vbp为名分别将窗体文件和工程文件保存在d:\vb\4的目录下(本题要求采用循环语句来完成). 图4-2(3) 利用VB创建一个标准exe程序,在窗体上打印出九九乘法口诀表.如下示:要求点击一下程序的窗体,窗体上就能够打印出九九乘法表. 并以4-3.frm和4-3.vbp为名分别将窗体文件和工程文件保存在d:\vb\4的目录下(本题要求采用循环语句来完成). 图4-3(4) 利用VB创建一个标准exe程序,求解如下问题:1+1/2+1/4+……+1/50的值.要求将结果打印在程序的窗体上.并以4-4.frm和4-4.vbp为名分别将窗体文件和工程文件保存在d:\vb\4的目录下(本题要求采用循环语句来完成). 图4-4(5)利用VB创建一个标准exe程序,计算1+2+3….+100的值.要求用do while-loop,for,do—loop while ,do---until loop,do…loop until,While----wend各实现一次.将结果显示在form窗体上.并以4-5-1.frm和4-5-1.vbp…..4-5-6.frm及4-5-6.vbp为名分别将窗体文件和工程文件保存在d:\vb\4的目录下(本题要求采用循环语句来完成). 图4-5三、实验环境(1)硬件:PC机(2)软件:Windows 操作系统、Visual Basic 6.0四、实验步骤1. 利用VB创建一个标准exe程序,程序用牛顿迭代法求方程2x3-4x2+3x-6=0的准确解x,程序界面包括两个文本框,两个按扭,两个标签控件.在第文本框text1内输入方程的初始点,在文本框text2内输出解.用户界面如图4-1所示,并以4-1.frm和4-1.vbp为名分别将窗体文件和工程文件保存在d:\vb\4的目录下(本题要求采用循环语句来完成).操作步骤如下:启动Visual Basic窗体属性设置如下:控件名称 属性 Form1 Caption=“牛顿迭代法求根” Lbael1 Caption=“X0=” Label2 Caption=“X” Text1 Text=” ” Text2 Text=” “ Command1 Caption=”计算” Command2 Caption=“退出” (3)窗体控件布局如下图所示(4)双击窗体,打开代码窗口,在Command1_Click()事件中输入如下代码:Dim x, x0, f, f1 As Single x0 = Val(Text1.Text) Do ?x0 = x ?f = ((2 * x0 - 4) * x0 + 3) * x0 - 6 ?f1 = (6 * x0 - 8) * x0 + 3 ?x = x0 - f / f1 ?Loop While Abs(x - x0) = 0.00005 ?Text2.Text = x 在command2_click()事件中输入End (5)单击“文件”/“保存工程”菜单项,以4-1.frm和4-1.vbp文件名将窗体和工程文件保存在D:\VB程序内。(6)说明:牛顿迭代法的计算步骤是:(I)牛顿迭代公式是:xn+1=x
您可能关注的文档
最近下载
- 卫生部手术分级目录(2025年1月份修订).doc VIP
- 古代文学试题和答案.doc VIP
- 《英语》(新标准)初中修订版七年级上册Starter第1课时课件 (1)教育教学资料整理.pptx VIP
- 历史上的名门望——伊氏.doc VIP
- 低血糖病人的急救.pptx VIP
- 12水保arcgis制图课件实验三.pptx VIP
- 12水保arcgis制图课件实验一.pptx VIP
- 12水保arcgis制图arcgis制图课件实验二.ppt VIP
- 2025在线学习课堂网课《伤寒论临证应用规律解析》单元测试考核答案.pdf VIP
- 2024届高考政治一轮复习统编版选择性必修2《法律与生活》知识点提纲精华版(实用,必备!).docx VIP
文档评论(0)