《VB课件4.ppt

  1. 1、本文档共85页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
《VB课件4

目标 掌握顺序结构(赋值语句、数据的输入和输出)。 掌握选择结构(If条件语句、Select Case语句、条件函数)。 掌握循环结构(For循环语句、Do循环语句)。 4.1 VB的程序语句 语句的书写规则 语句的书写规则 编码规则 4.2 顺序结构 4.2.1 赋值语句 赋值语句注意点 赋值语句注意点 赋值号两边数据类型不同时的处理 赋值号两边数据类型不同时的处理 4.2.2 数据的输出和输入 输入对话框InputBox函数 MsgBox函数和MsgBox过程 MsgBox按钮设置 示例 MsgBox所选按钮返回值 示例 示例 Print方法 Print方法示例 Print方法注意 Format格式输出函数 4.3 选择结构 4.3.1 If条件语句 单分支结构 双分支结构 双分支结构例 双分支结构例 IF语句的嵌套 示例 示例分析 示例分析 示例分析 多分支结构 多分支结构例 多分支结构 多分支结构例 方法一 方法二 方法三 多分支结构例 4.3.2 Select Case语句 Select Case语句例 Select Case语句例 Select Case语句例 4.3.3 条件函数 4.3.3 条件函数 4.3.4 分支结构的嵌套 选择结构示例 选择结构示例 顺序结构示例 4.4 循环结构 4.4.1 For循环 示例 4.4.1 For循环 For循环示例 For循环示例 For循环示例 For循环示例 For循环示例 4.4.2 While循环 示例 4.4.3 Do…Loop循环 示例 示例 4.4.4 多重循环 多重循环示例 多重循环示例 4.5 其他辅助控制语句 4.5.2 On…GoTo语句 4.5.3 退出和结束语句 4.6 综合应用 判断闰年 最大公约数 最大公约数 数制转换 级数求和 试凑法 递推法 今天我们要学习的是OOP的二个重要特点:继承inherit和多太polymorphism 例 编写程序,显示所有的水仙花数。所谓水仙花数,是指一个3位数,其各位数字立方和等于该数字本身。例如153=13+53+33。 For n = 100 To 999 a = n \ 100 b = n \ 10 Mod 10 c = n Mod 10 If n = a^3 + b^3 +c^3 Then Print n; Next n Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 例 编写程序,判断一个大于2的正整数是否为素数。 分析:素数就是除了1和本身之外,不能被其他任何整数整除的数。为了判断正整数n是不是素数,可以将n除以2~n-1之间的所有整数,如果都除不尽,则n是素数,否则n就不是素数。 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 古印度有一位聪明的大臣,他发明了国际象棋,献给了国王。国王很喜欢,作为封赏,国王答应满足大臣所提出的一个要求。大臣说:“就在这个棋盘上放一些米粒吧,第1格放1粒米,第2格放2粒米,第3格放4粒米,然后是8粒,16粒,……一直到64格。” Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. While循环用于控制循环次数未知的循环结构。 While 条件 循环体 Wend 注意:While循环语句先对条件进行测试,条件为True时执行循环体,否则不执行循环体。若条件一开始就不成立则一次也不执行循环体。 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 例 设有一张足够大的厚度为0.5mm的纸,折多少次可以到达或超过珠穆朗玛峰的高度(8848.13m)。 x = 0.5 n = 0 While x 8848130 x = x * 2 n = n + 1 Wen

文档评论(0)

wendan118 + 关注
实名认证
内容提供者

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

1亿VIP精品文档

相关文档