- 1、本文档共127页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第五章 三种基本结构程序设计 本章主要任务: (1)了解算法概念及表示; (2)掌握顺序结构程序设计方法; (3)掌握赋值语句的使用; (4)掌握VB 数据的输入/输出方法; (5)掌握VB选择结构的格式及使用; (6)掌握VB循环结构的格式及使用; (7)正确理解选择结构和循坏结构的嵌套。 5.1-2 赋值语句 赋值语句的使用格式: 变量名=表达式 对象.属性=表达式 功能: 将表达式的值赋值给变量名或指定对象的属性。 一般用于给变量赋值或对控件设定属性值. 例: sRate!=0.1 Text1.Text = 欢迎使用Visual Basic 6.0” 说明: 1 执行过程:先求表达式的值,然后将值赋值给左边的变量。 2 右边的表达式可以是变量、常量、函数调用等特殊的表达式。 3 不要将“=”理解为数学上的等号: A=A+1 是表示将A单元的值加1后以放回到A单元。 5.1-2 赋值语句 5.1-2 赋值语句 举例(下列赋值语句有无错误,为什么?) 例1: Dim X,Y,Z As Integer X = 4 Y = X * a Z = X * Str(X) Print X,Y,Z 例2:X+Y=5 例3: Sin(X)=2 例4: X,Y,Z=0 5.1-2 赋值语句 注意: 赋值号“=”左边只能是变量名或对象的属性名,左边不能出现表达式或函数调用 一次只能对一个变量赋值 赋值号“=”两边的数据类型一般要求应一致。 如两边类型不同,则以左边的数据类型为基准 如右边表达式结果的数据类型能转换成左边的数据类型,则右边先强制转换后,再赋值给左边 如右边表达式结果的数据类型不能转换成左边的数据类型,则系统提示出错 5.1-2 赋值语句 【经典例子】设计程序交换两个变量的值. 思考:有两个瓶子A和B,分别装有醋和豆油,如何交换两个瓶子的液体? 方法:借用第3个瓶子T 算法:T=A:A=B: B=T 设计界面: 5.1-2 赋值语句 代码: Private Sub Command1_Click() t= Text1.Text Text1.Text= Text2.Text Text2.Text =t End Sub 5.1-3 数据的输出 5.1-3 数据的输出 【举例】 Private Sub Command1_Click() a = 2: b = 3: c = 6 Print a, b, c, stud, dent Print a; b; c; stud; dent Print a=; 2; Print b=; 3 End Sub 5.1-3 数据的输出 2. MsgBox函数和MsgBox过程 函数形式:变量[%] = MsgBox(提示[,按钮[+图标]+ [缺省按钮]+[模式]][,标题]) 过程形式: MsgBox 提示[,按钮[+图标] +[缺省按钮]+ [模式]][,标题] 5.1-3 数据的输出 5.1-3 数据的输出 根据用户所选按钮,函数返回1—7的整数值,其含义如下表:(表5.2) 5.1-3 数据的输出 格式: MsgBox(msg[,type][,title]) MsgBox函数的应用--例1: Private Sub Form_Click () msg1$ = 要继续吗? msg2$ = Operation Dialog Box r = MsgBox(msg1$, 34, msg2$) Print r End Sub 注:34=2(按钮数目样式)+32(图标类型)+0(默认按钮)+0(模式) 例2:要求:单击窗体,出现提示框 在窗体的Click事件中编写代码: Private Sub Form_Click() a = MsgBox(确定删除文件吗?, 1 + 32, msgbox示例) End Sub MsgBox过程(语句) MsgBox函数也可以写成过程代码的形式。由于MsgBox过程没有返回值,因而常用于较简单的信息显示。 格式: MsgBoxmsg[,type][,title] 例如: MsgBox 工
您可能关注的文档
- 明代文章总集及文体学——以《文章辨体》等三部总集为中心.pdf
- 音万尼音频处理器原理及使用.doc
- 第十一章 广州周立功单片机发展有限公司.pdf
- 员工组织承诺的形成过程_内部机制与外部影响_基于社会交换理论的实证研究.pdf
- 专题五 第一节 物质世界.doc
- 认识钟表(有动画)教案.ppt
- 管道支架和支墩土建施工图.pdf
- 第7讲数字载波调制.pdf
- 汽车电子解决方案教案.pdf
- 英语图表作文模板课件.doc
- 2024年中国汽车高效充电器市场调查研究报告.docx
- 2024年复合材料沙井盖项目可行性研究报告.docx
- 2024至2030年中国CPE防水卷材行业投资前景及策略咨询研究报告.docx
- 2024至2030年中国非金属软管数据监测研究报告.docx
- 2024至2030年中国卷铁芯行业投资前景及策略咨询研究报告.docx
- 2024年中国车身极速离子膜市场调查研究报告.docx
- 2024至2030年伸缩式手臂项目投资价值分析报告.docx
- 2024至2030年中国工程塑料自吸泵数据监测研究报告.docx
- 2024至2030年沙滩椅子项目投资价值分析报告.docx
- 2024至2030年中国水处理过滤片数据监测研究报告.docx
文档评论(0)