- 1、本文档共96页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第四章节授课ppt-江苏省计算机等级考试.ppt
第四章
算法基础及VB的基本语句
1、了解结构化程序设计的基本概念
2、掌握VB 程序设计中的常用语句
3、掌握顺序、选择、和循环结构及相应的语句
教学要求
教学内容
4.1 算法及程序设计基础
4.2 赋值语句及InputBox、MsgBox函数
4.3 分支结构与分支结构语句
4.4 循环结构与循环结构语句
4.5 程序示例
4.1 算法及程序设计基础
一个程序( 过程)应包括:
Nikiklaus Wirth认为:
有人认为:
对数据的描述:指定所用数据的类型,作用域和数据的
组织形式,即数据结构(data structure)。
对操作的描述:即操作步骤,也就是算法(algorithm)。
数据结构+算法=程序
程序=算法+数据结构+程序设计方法+语言工具和环境
1、算法的概念
算法
即解决某个问题或处理某件事的方法和步骤;“采用什么结构,使用什么语句以及如何安排这些语句”。
算法分类:
数值计算算法
非数值计算算法
算法优劣:
正确性,效率,占用系统资源,便于理解,易于调试等。
18
10
M N R
8
10
8
2
8
2
0
2
0
R=8
R=2
R=0
M=2即最大公约数
求最大公约数
[题目]:求两个自然数的最大公约数
[分析]:求最大公约数的常用方法是辗转相除法(欧几里德算法)。
2、算法示例
[算法描述]:
S1 输入两个自然数:M,N;
S2 求M除以N的余数R;
S3 使M=N,即用N代换M;
S4 使N=R,即用R代换N;
S5 若R≠0,则重复执行S2,S3,S4,否则转至S6
S6 输出M,M即为M,N的最大公约数。
3、算法的特征
确定性
可行性
有穷性
输入性
输出性
4、算法的描述
程序流程图
求最大公约数
程序编码——实现算法
算法仅提供解题思路,计算机不可直接执行。
用某一程序设计语言所提供的语言成分,根据该语言的特点,并利用该语言的各种工具和手段,遵照规定的语法规则去实现算法,得到原程序代码,计算机可识别并执行。
5.基本算法结构
1). 顺序结构
语句1
语句2
语句块
结构化程序设计
2)选择结构
结构化程序设计
3)循环结构
结构化程序设计
三种基本结构的共同特点
只有单一入口和单一出口;
结构中的每一部分都有被执行的可能;
结构内不应出现永不终止的死循环。
4.2 赋值语句及InputBox、MsgBox函数
4.2.1 赋值语句
4.2.2 InputBox函数
4.2.3 MsgBox函数
4.2.1 赋值语句
[格式]:变量名=表达式
[功能]:先计算表达式的值,再将该值赋予左端的变量。
[说明]:
-赋值号左端不仅可以是变量名,还可以是对象的属性;
-表达式的类型和变量的类型要一致
-赋值语句是按语句出现的先后顺序执行的(顺序结构)
[举例]:
str1 = Nice to meet you
number% = 72
Lable1.Caption = Filename is:
Text.FontSize = 12 ‘改变字号
使用下面的方法可以获取一个对象的属性值:
var = object . Property
例如:Label1.Caption=Text1.Text
式中,var是变量名、object是对象名、property是该对象的某个属性名。
特别注意:属性也存在数据类型,所以在获取对象的属性值时,最好使用具有相同数据类型的变量。
[说明]
注意:赋值号(=)与比较运算符(=)不同
赋值是独立的一条语句;
由运算符(=)连结两个操作数的关系表达式是语句的一部分, 不可单独存在
比较运算符不会改变操作数的值;
赋值语句会,改变赋值号左边的量,所以必须是可以被赋值的变量或属性
Dim x As Integer, y As Integer, z As Boolean
x=3 : y=4 : y=x
z = x=y
Print x, y, z
Private Sub Form_Click()
Dim a As Integer,b As Integer
a=10
b=3*a
Print a,b
End Sub
Private Sub Form_Click()
Dim
文档评论(0)