- 1、本文档共11页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
算法与程序设计复习讲稿(程序篇)
顺序结构 按照整个程序的书写顺序依次执行。 (举例) 求半径为r的圆的面积 分析:此题要求我们通过键盘输入一个半径r的值,然后通过程序实现计算出圆的面积显示出来。 算法 : (1) 输入半径r (2)计算 s=3.14xrxr (3)输出s VB可视化编程的方法与步骤? 1.建立对象 2.修改属性 3.代码编写 4.调试运行 Private Sub Command1_Click() 选择结构 在vb中,选择结构可用if语句来实现,if语句有如下三种。 1.单分支选择结构 2.双分支选择结构(重点讲述) 3.多分支结构 双分支选择结构 If…Then…Else语句 If 表达式 Then 语句块1 Else 语句块2 End If 或 If 表达式 Then 语句1 Else 语句2 举例:书店购书送购书券 某书店在六一期间开展购书送券活动,凡购书满200元送15%购书券,否则不送(购书券最小面值为一元) Private Sub Command1_Click() Dim x As Single, y As Integer x = Text1.Text If x = 200 Then y = x * 0.15 Else y = 0 End If Text2.Text = y End Sub 循环结构 如果需要重复执行某一段代码的程序,需要使用循环结构来实现。 For 循环语句的基本格式 For 循环变量=初值 to 终值 step 步长 语句组 Next 循环变量 举例:计算1+3+5+…+99的和 Sum=0 Sum=sum+1 Sum=sum+3 … Sum=sum+99 Sum=sum+i (i =1 to 99 step 2) Private Sub Command1_Click() Dim i As Integer, sum As Integer sum = 0 For i = 1 To 99 Step 2 sum = sum + i Next i Print sum=; sum End Sub * * 程序的基本结构 本节课围绕着程序的基本结构来进行讲述,通过实例我们来掌握vb程序设计。 Vb程序包含了以下三种结构: 1.顺序结构 2.选择结构 3.循环结构 本节课我们主要看代码编写,其他步骤以提前完成。 “按钮” 对象 “单击” 过程 Dim r As Single, s As Single r = InputBox(r=, 请输入半径) s = 3.14 * r * r Print s=; s End Sub text1 text2 sum *
您可能关注的文档
- 第三部分 网络课件设计与制作.ppt
- 第九单元课件.ppt
- 第九章 婴儿人格发展-2014-秋.ppt
- 第三课时 匀变速直线运动的位移与时间的关系(42张PPT).ppt
- 第九讲 分页存储过程.ppt
- 第三章电影的数字化新生.ppt
- 第二十一講+魏晉風度.ppt
- 第二三章_陆地和海洋、天气.ppt
- 第二代支付系统直接参与者接入技术验收介绍(第六批).pptx
- 第二十講+魏晉六朝的文學思想.ppt
- 安徽双轮酒业股份有限公司校园招聘模拟试题附带答案详解完整.docx
- 安徽叉车集团有限责任公司校园招聘模拟试题附带答案详解及答案一套.docx
- 安徽叉车集团有限责任公司校园招聘模拟试题附带答案详解完整.docx
- 安徽叉车集团有限责任公司校园招聘模拟试题附带答案详解及参考答案.docx
- 安徽叉车集团有限责任公司校园招聘模拟试题附带答案详解参考答案.docx
- 安徽叉车集团有限责任公司校园招聘85人公开引进高层次人才和急需紧缺人才笔试参考题库答案详解版学生专用.docx
- 安徽叉车集团有限责任公司校园招聘85人公开引进高层次人才和急需紧缺人才笔试参考题库答案详解版带答案.docx
- 安徽叉车集团有限责任公司校园招聘85人公开引进高层次人才和急需紧缺人才笔试参考题库答案详解版完整.docx
- 安徽华茂集团有限公司校园招聘85人公开引进高层次人才和急需紧缺人才笔试参考题库答案详解版新版.docx
- 安徽华茂集团有限公司校园招聘模拟试题附带答案详解推荐.docx
文档评论(0)