第4章第4章4循环控件(709KB).ppt

  1. 1、本文档共29页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
小 结 循环相关控件 单选按钮、 复选框 框架 PictureBox图片控件 定时器 华中农业大学信息学院 * (1)通过随机函数Rnd产生试题的操作数和运算符,运算符+、-、×、÷可对应编号1~4。产生表达式通过Form_Load事件过程。 (2)需要有一个全局变量保存四则运算题的正确答案,用户答案可通过文本框输入。 (3)本题主要将随机函数、If语句、Select语句综合在一起使用。 * * * 用户界面是应用程序的一个重要组成部分,主要负责用户与应用程序之间的交互。 System.Windows.Forms命名空间中的类可 以分为两类: 用户界面控件 在设计和程序运行时显示在 窗体上。 例如,Label、Button控件 非用户界面控件 设计阶段出现在窗体下的 专用面板中,程序运行时是不可见。 * 例如:10年期100万的公积金贷款,并且是初次贷款,则月还款额为 100000*(1.+0.05*0.9*0.95)/(10*12) * * * * * * 1. SizeMode 2. AutoSize 3. CenterImage 4. Normal 5. StretchImage * * 例如,红灯延迟2秒,则在切换到红灯后把Interval设置为2000,这样过2秒后发生Timer事件再切换到其它颜色的灯。 用变量i控制红绿灯的自动切换,它的值在0∽2之间循环变化:i为0时显示红灯;i为1时显示黄灯;i为2时显示绿灯。 分析:改变时钟的Interval属性来延迟不同颜色的灯。 * 华中农业大学理学院计算机系 华中农业大学理学院计算机系 VisualBasic.Net程序设计 华中农业大学信息学院 第4章 综合应用 华中农业大学信息学院 4.1基本结构回顾 4.2常用控件(二) 4.1 基本结构复习 一、顺序结构 1.赋值语句/复合赋值语句 2.InputBox函数 3.MsgBox函数 华中农业大学信息学院 二、选择结构 华中农业大学信息学院 1.If条件语句 单分支结构 If…Then语句 双分支结构 If…Then…Else语句 多分支结构 If…Then…ElseIf 语句 If语句的嵌套 2. Select Case语句 3. 条件函数 IIf函数 Choose函数 例4-1. 由计算机自动产生四则运算题,并能判断答案的正确性。 二、选择结构 华中农业大学信息学院 三、循环结构 1、For循环语句 华中农业大学信息学院 For 循环变量=初值 to 终值 [Step步长] 语句块 [Exit For] 语句块 Next 循环变量 综合应用-递推法 华中农业大学信息学院 递推(迭代)法基本思想是把一个复杂的计算过程转化为简单过程的多次重复。每次都从旧值的基础上递推出新值,并由新值代替旧值。 例4-2 斐波拉契数列-兔子繁殖问题 华中农业大学信息学院 三、循环结构 三、循环结构 2. Do…Loop循环语句 Do { While|Until }条件 语句块 [Exit Do 语句块] Loop [{ While|Until }条件 ] 华中农业大学信息学院 例4-3 百元买百鸡: 假定小鸡每只5角,公鸡每只2元,母鸡每只3元。现有100元要求买100只鸡,列出所有可能的购买方案。 三、循环结构 华中农业大学信息学院 综合应用-试凑法 华中农业大学信息学院 分析: (1) 设母鸡、公鸡、小鸡各为x、y、z,列出方程为: x+y+z= 100 3x+2y+0.5z = 100 三个未知数,两个方程,此题求若干个整数解。 (2) 计算机求解此类问题,采用试凑法(也称为穷举法)来实现,即将可能出现的各种情况一一罗列测试,判断是否满足条件,采用循环结构来实现。 在若干个数中求最大值,一般先假设一个较小的数为最大值的初值,若无法估计较小的值,则取第一个数为最大值的初值;然后将每一个数与最大值比较,若该数大于最大值,将该数替换为最大值;依次逐一比较。 综合应用-求最大或最小值 华中农业大学信息学院 例4-4 随机产生10个100~200之间的数,求最大值。 Dim x%, i%, max x = Int(Rnd() * 101 + 100) max = x TextBox1.Text = x vbCrLf For i = 1 To 9 x =

文档评论(0)

精品课件 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档