- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
[计算机软件及应用]VB复习 Visual Basic程序设计
目 录 第4章 VB控制结构 4.1 顺序结构 4.2 选择结构 4.3 循环结构 4.4 其它辅助控制语句 4.5 综合应用 4.6 程序调试 相关知识 VB具有结构化程序设计的三种结构,即顺序结构、选择结构、循环结构,是程序设计的基础。 本章要求 掌握并灵活应用顺序结构语句及控件 赋值语句、输入输出函数与控件(InputBox、 TextBox、MsgBox 、Print、Label)示例 掌握并灵活应用选择结构语句 IF语句、SlectCase语句 掌握并灵活应用循环结构语句 For语句、Do…Loop语句 掌握其它辅助语句 学完之后大多数简单的程序都可以编写了。示例 4.1 顺序结构 4.1.1 赋值语句 赋值语句注意点 4.1.2 数据输出和输入 4.1.2 数据输出和输入 MsgBox函数和MsgBox过程 MsgBox按钮设置 MsgBox所选按钮返回值 Print方法 Print方法 思考下面的代码将输出什么内容? Print hello Print 大家好 Print hello; Print 大家好 Print hello, Print “大家好“ Print hello; 大家好 Print hello, 大家好 演示 Print方法 Print方法-精确位置输出 Print方法在窗体上输出内容的位置是由Form的两个属性决定的: CurrentX CurrentY 返回或设置下一次打印或绘图方法的 水平 (CurrentX) 或垂直 (CurrentY) 坐标 Cls方法:清除print输出的内容,并将CurrentX和CurrentY都设置为0。 示例 Format格式输出函数 4.2 选择结构 4.2.1 If条件语句 单分支结构 双分支结构 双分支结构例 多分支结构 多分支结构例 多分支结构例 例子4.8 已知某课程的百分制成绩mark,要求转换对应五级的评定Grade,评定条件如下: 多分支结构例 分析一下三种方法的正确性:演示 If语句的嵌套 4.2.2 Select Case语句 Select Case语句例 Select Case语句例 4.2.3 条件函数 4.2.3 条件函数 综合应用 4.3 循环结构 4.3.1 For循环语句 引例 计算1~100的奇数和? Sum=sum+1+3+5…+99? 循环累加一个有规律的数字。 4.3.1 For循环语句 For循环语句 For循环语句 例4.11 计算1~100的奇数和 Dim i%, sum% For i = 1 To 100 Step 2 sum = sum + i Next i MsgBox(sum) For循环语句 例4.12 将可打印的ASCII码制成表格输出(32-126,1项占8列,一行输出7项。) 先考虑如何输出这些ASCII码值; 考虑如何控制格式? 1项占8列 一行输出7项。 4.3.2 Do…Loop循环语句 Do…Loop流程(While) Do …Loop流程(Until) 循环例题 4.3.3 循环的嵌套 4.4 其他辅助控制语句 4.4 其他辅助控制语句 Private Sub Command1_Click() Dim i%, m% m = Val(Text1) For i = 2 To m - 1 If (m Mod i) = 0 Then Next i Picture1.Print m 是素数 End Sub 4.4 其他辅助控制语句 Private Sub Command1_Click() Dim i%, m%, Tag As Boolean m = Val(Text1) Tag = True 假定是素数 For i = 2 To m - 1 If (m Mod i) = 0 Then Tag = False Next i If Tag Then Picture1.Print m 是素数 End Sub 4.4 其他辅助控制语句 求3~100中的所有素数如何做? Private Sub Form_Click() Dim i%, m%, Tag As Boolean For m=3 to 100 Tag = True 假定是素数 For i = 2 To Sqr(m) If (m Mod i
您可能关注的文档
- [计算机软件及应用]PID算法.ppt
- [计算机软件及应用]PLSQL.doc
- [计算机软件及应用]PLC实验报告6个.doc
- [计算机软件及应用]PMP模拟试题-3.pdf
- [计算机软件及应用]PLC使用范例2004年9月.ppt
- [计算机软件及应用]PLC5-6指令2.ppt
- [计算机软件及应用]photoshopCS5从菜鸟到达人教程价值89元上.ppt
- [计算机软件及应用]PowerBuilder应用开发系列.doc
- [计算机软件及应用]pore-QQ.doc
- [计算机软件及应用]powerplay简介.ppt
- 实验室危废随意倾倒查处规范.ppt
- 实验室危废废液处理设施规范.ppt
- 实验室危废处置应急管理规范.ppt
- 初中地理中考总复习精品教学课件课堂讲本 基础梳理篇 主题10 中国的地理差异 第20课时 中国的地理差异.ppt
- 初中地理中考总复习精品教学课件课堂讲本 基础梳理篇 主题10 中国的地理差异 第21课时 北方地区.ppt
- 危险废物处置人员防护培训办法.ppt
- 危险废物处置隐患排查技术指南.ppt
- 2026部编版小学数学二年级下册期末综合学业能力测试试卷(3套含答案解析).docx
- 危险废物处置违法案例分析汇编.ppt
- 2026部编版小学数学一年级下册期末综合学业能力测试试卷3套精选(含答案解析).docx
最近下载
- 米油调料副食品配送投标方案技术标.docx
- 工艺部门三年工作规划.pptx
- QC成果-提高外墙保温装饰一体板一次施工合格率.docx VIP
- 中国心房颤动管理指南(2025版)解读ppt课件.pptx VIP
- 风电安全文明施工策划.docx
- 管理英语1-国家开放大学电大机考网考题目答案 .pdf VIP
- TS16949:2016中文版(标准-高清).pdf VIP
- 炎德·英才大联考长沙市一中2026届高三月考(五)地理试卷(含答案详解).pdf
- QC成果提高外墙保温装饰一体板一次施工合格率.docx VIP
- 高中英语(新人教版)选择性必修三同步习题:UNIT 1 Part 3(同步习题)【含答案及解析】.pdf VIP
原创力文档


文档评论(0)