vb02自动保存问题.ppt

第三章 VB基本语言,3.1 编程基础,一、书写规则 1）代码不区分字母的大小写（VB对代码自动转换）。 2）在同一行上书写多句语句，语句间用冒号“：”隔开。 3）单行语句可分若干行书写，在本行后加续行符（空格和下划线）。 4）一行字符不超过255个字符。 二、注释语句 格式 Rem 注释内容 注释内容 说明： 1）用 的注释可以直接出现在语句后面。 例：a=5:b=6:c=7 给变量赋值,2）可以使用“编辑”工具栏的“设置注释块”、“解除注释块”按钮，使选中的若干行语句增加注释或取消注释。,3.2 数据类型 一、基本数据类型 1、String 字符数据类型 字符可以包括所有西文字符和汉字，之间用双引号括起。 例：“12345”、“abcd123”、 “程序” 注意： 1）“”表示空字符串，“ ”表示有一个空格的字符串。 2）按照缺省规定，String 变量或参数是一个可变长度的字符串，随着对字符串赋予新数据，它的长度可增可减。 也可以声明字符串具有固定长度。 3）用语法声明一个定长字符串：String * size 例：为了声明一个长度为 50 字符的字符串： Dim xm As String * 50 如果赋予字符串的字符少于 50 个，则用空格将xm 的不足部分填满。如果赋予字符串的长度太长，已不能成为定长字符串，则 Visual Basic 会直接截去超出部分的字符。,2、Numeric 数值数据类型 Numeric 数据类型包括：Integer（整型）、Long（长整型）、Single（单精度浮点型）、Double（双精度浮点型）和 Currency（货币型）。 1）Integer和Long型用于保存整数，整数运算速度快、精确，但表示数的范围小。要表示长整数，在数字后加&号，例：123&。 2）Single和Double型用于保存浮点实数，浮点数表示数的范围大，但有误差。 单精度的表示方法：带小数的（123.45）、在数字后加！（123.45!）、科学计数法：0.12345E+3 双精度的表示方法：123.45#、0.12345E+3#、0.12345D+3 3）Currency型是定点实数或整数，最多保留4位小数、15位整数，表示形式为数字后面加符号，如123.45、123。,3、Byte 字节数据类型 Byte 用于存储二进制数，实际上是一种数值类型，以1个字节的无符号二进制数存储， 范围为0 - 255 ，不能表示负数。 4、Boolean 布尔数据类型(逻辑数据） 逻辑型数据只有两个值： 真（True）和假（False） 注意： 当把数值型数据转换为逻辑型数据时，0 转换为False，非0值转换为True。 当把逻辑型数据转换为数值型数据时False转换为0，True转换为-1。,5、Date日期数据类型 日期范围：100年1月1日9999年12月31日。 时间范围：0:00:0023:59:59 表示方法：用#号将任何可以被认作日期和时间的字符括起来如：#1998-5-12#、#1 Jan,98# 当其它数值数据类型转换为 Date 时，小数点左边的值表示 Date 信息，小数点右边的值则代表 Time。午夜为 0，正午为 0.5。负数表示公元 1899 年 12 月 31 日之前的 Date。 例：3-1,6、Object 对象数据类型 Object 变量作为 32 位（4 个字节）地址来存储，该地址可引用应用程序中或某些其它应用程序中的对象。可以随后（用 Set 语句）指定一个被声明为 Object 的变量去引用应用程序所识别的任何实际对象。 例：Dim objDb As Object Set objDb = OpenDatabase(“c:Vb5book.mdb“) 7、Variant 变体数据类型 一种特殊的数据类型，为VB的数据处理增加了智能性，Variant 变量能够存储所有系统定义类型的数据。如果把它们赋予 Variant 变量，则不必在这些数据的类型间进行转换； Visual Basic 会自动完成任何必要的转换。 例：Dim SomeValue 缺省为 Variant。 SomeValue = “17“ SomeValue包含 ”17”（双字符的串）。 SomeValue = SomeValue - 15 现在， SomeValue 包含数值 2。 SomeValue = “U“ & SomeValue 现在， SomeValue 包含 “U2“ （双字符的串）。,二、创建自己的数据类型 不同类型的变量可以组合起来用来创建用户定义的类型。当需要创建单个变量来记录多项相关的信息时，用户定义类型是十分有用的。 格式：Type 数据类型名 数据类型元素名 As 类型名 数据类型元素名 As 类型名 End Type 例如：Type SystemInfo CPU As Variant Memory As Long VideoColors As Integer Cost As Currency PurchaseDate As Variant End Type,对同一种用户定义类型，可以声明为局部的、私有的或公用的模块级变量： Dim MySystem As SystemInfo, YourSystem As SystemInfo 对这种变量的元素赋值和从元素中检索值类似于属性的设置和获取： MySystem.CPU = “486“ If MySystem.PurchaseDate #1/1/92# Then 如果两个变量都属于同一个用户定义类型，也可以将其中一个变量赋给另一个变量。这种赋值是将一个变量的所有元素赋给另一个变量的对应元素。 YourSystem = MySystem 例：3-3,三、枚举类型 枚举类型提供了方便的方法处理有关的常数和使名称与常数数值相关联。 例如，可以为与星期日期相关联的一组整数常数声明一个枚举类型，然后在代码中使用星期的名称而不使用其整数数值。 格式：Public|Private Enum 类型名称 成员名 =常数表达式 成员名 =常数表达式 End Enum 说明： 1）Public可选的。表示该 Enum 类型在整个工程中都是可见的。Enum 类型的缺省情况是 Public。 2）Private可选的。表示该 Enum 类型只在所声明的模块中是可见的。,3）常数表达式可选的。元素的值（为 Long 类型）。可以是别的 Enum 类型。如果没有指定常数表达式，则所赋给的值或者是 0（如果该元素是第一个成员名 ），或者比其直接前驱的值大 1。 例：3-2,3.3 常量和变量 一、常量 声明常数的语法是： Public|Private Const 常量名 As 类型 = 表达式 Const 语句可以表示数量或 Date / Time 量： Const conPi = 3.14159265358979 Public Const conMax As Integer = 9 Const conDate = #1/1/95# 可用 Const 语句定义字符串常数： Public Const conVersion = “07.10.A“ Const conCodeName = “ASCII“ 如果用逗号进行分隔，则在一行中可放置多个常数声明： Public Const conPi = 3.14, conMax = 9, _ conWorldPop = 6E+09,定义常数，就可将其放置在代码中，使代码更可读。例如： area= conPi*r*r 二、变量 在 Visual Basic 中执行应用程序期间，用变量临时存储数值。变量有名字（用来引用变量所包含的值的词）和数据类型（确定变量能够存储的数据的种类）。 1、常量和变量命名约定 （1）必须以字母或汉字开头，由字母、汉字、数字或下划线组成。 （2）长度小于或等于255个字符。 （3）不能使用VB的保留字。 （4）不区分大小写。 （5）在同一个范围内必须是唯一的。范围就是可以引用变量的变化域 一个过程、一个窗体等等。,3xy 数字开头 y - z 不允许出现减号 Wang Ping 不允许出现空格 Dim VB.NET的关键字 Cos 标准函数名,2、变量声明 （1）用 Dim 语句声明 格式：Dim 变量名 As 类型 说明： 类型为可选的。变量的数据类型；可以是 Byte、布尔、Integer、Long、Currency、Single、Double、Date、String（对变长的字符串）、String * length （对定长的字符串）、Object、Variant、用户定义类型、或对象类型。所声明的每个变量都要一个单独的“ As 类型子”句。 缺省“As 类型”，则所创建的变量默认为变体类型。 可在变量名后加类型符代替“As 类型” 例：Dim intX As integer,intY As integer,sngall As single Dim intX%,intY%,sgnall! Dim AnotherVar, Choice As Boolean, BirthDate As Date （AnotherVar 为 Variant 类型 ）,（2）隐式声明 在使用一个变量之前并不必先声明这个变量。 例： Private Sub Form_Click() Sum = 0 a = 10: b = 20 Sum = a + b Print “Sum=“; Sum End Sub （）强制显式声明Option Explicit语句 良好的编程习惯都应该是“先声明变量，后使用变量”，这样做可以提高程序的效率，同时也使程序易于调试。Visual Basic 中可以强制显式声明，可以在窗体模块、标准模块和类模块的通用声明段中加入语句：Option Explicit 或如果设置: 工具选项编辑器要求变量声明，则在后续模块中自动插入 Option Explicit,（4）Deftype 语句 在模块级别上，为变量和传给过程的参数，设置缺省数据类型。 格式：Deftype 字母范围，字母范围 说明：字母范围参数指定设置缺省数据类型的名称范围。不区分字母的大小写 。,例： 将名称以 A 至 K 开头变量的缺省数据类型设为 Integer 类型。 DefInt A-K 将名称以 L 至 Z 开头变量的缺省数据类型设为 String 类型。 DefStr L-Z,3.4 常用内部函数 一、数学函数,说明： （1）三角函数以弧度表示。 （2）0=Rnd(N)1 例：生成 1 到 6 之间的随机数值。 MyValue = Int(6 * Rnd) + 1),二、转换函数,三、日期、时间函数,四、格式输出函数 可以使数值、日期或字符串按指定的格式输出。 格式：Format$(表达式,格式字符串) 说明： （1）表达式是要格式化的数值、日期和字符串类型表达式。 （2）格式字符串表示按其指定的格式输出表达式的值，格式字符串有三类：数值格式、日期格式、字符串格式，格式字符串要加引号。 1、数值格式化,说明： 符号0、#，要显示数值表达式的整数部分位数多于格式字符串的位数，按实际数值显示。,2、日期和时间格式化,3.5 字符处理 一、ANSI、DBCS 和 Unicode 的定义 ANSI 是个人计算机使用得最普遍的字符集。 ANSI 标准使用单一字节表示每个字符（其代码通常成为ASCII码）。 Windows系统采用DBCS编码，是一套单字节与双字节的混合编码，西文以单字节，中文以两字节编码。 Visual Basic 使用 Unicode 存储和操作字符串。Unicode 是一种用两个字节表示一个字符的字符集。,例：3-4 LenB(C) 字符串所占字节数,二、字符串处理函数,3.6 运算符与表达式,运算符和表达式 ： 结果类型 算术运算符与算术表达式 数值 字符串运算符与字符串表达式 字符串 关系运算符与关系表达式 逻辑 逻辑运算符与逻辑表达式 逻辑,一、算术运算符,说明： （1）在进行整除运算之前，数值表达式通过舍去小数部分转换成 Byte、Integer 或 Long表达式，任何小数部分都被删除。 （2）使用 Mod 运算符来对两数作除法运算，但返回其余数而非商数。如果两数中有一数为浮点数，该数会先被四舍五入成整型后再进行运算。,例：5+10 mod 10 9 / 3+2 2 结果：10,注意：对算术运算符两边的操作数应是数值型，若是数字字符或逻辑型，则自动转换成数值类型后再运算。 例如： 30-True 结果是31，逻辑量True转为数值-1，False转为数值0 False + 10 + “4“ 结果是14,二、字符串运算符 + & 例如： “ABCD“ + “EFGHI“ 结果为：ABCDEFGHI “ VB ” & “程序设计教程” 结果为：VB程序设计教程 说明： 当连接符两旁的操作量都为字符串时，上述两个连接符等价。它们区别是： +（连接运算）：两个操作数均应为字符串类型； &（连接运算）：两个操作数既可为字符型也可为数值型，当是数值型时，系统自动先将其转换为数字字符，然后进行连接操作。 注意：使用运算符“&”时，变量与运算符“&”之间应加一个空格。这是因为符号“&”还是长整型的类型定义符，如果变量与符号“&”接在一起，VB系统先把它作为类型定义符处理，因而就会出现语法错误。,三、关系运算符 =、=、Like（ 字符串匹配）、Is（对象引用比较） 说明： 一个表达式是 Empty 而另一个是数值数据类型，进行数值比较，使用 0 作为 Empty 表达式。 一个表达式是 Empty 而另一个是 String，进行字符串比较，使用长度为零的字符串 (“”) 作为 Empty 表达式。 字符型数据是按其ASC码的顺序进行比较，对汉字是按拼音字母的顺序进行比较。 如： aacabb 结果为True.,aac,abb,相等,True,例：Dim MyResult, Var1, Var2 MyResult = (45 3) 返回 True。 MyResult = (“5“ “4“) 返回 True。 Var1 = “5”: Var2 = 4 设置变量初值。 MyResult = (Var1 Var2) 返回 True。 Var1 = 5: Var2 = Empty MyResult = (Var1 Var2) 返回 True。 Var1 = 0: Var2 = Empty MyResult = (Var1 = Var2) 返回 True。 Like 语法： 结果 = 字符串 Like 模式 模式中的统配符：?（任何单一字符）、*（零个或多个字符）、#（任何一个数字09）、范围（范围中的任何单一字符）、!范围（不在范围中的任何单一字符）,例：MyCheck = “aBBBa“ Like “a*a “ 返回 True。 MyCheck = “F“ Like “A-Z“ 返回 True。 MyCheck = “F“ Like “!A-Z“ 返回 False。 MyCheck = “a2a“ Like “a#a“ 返回 True。 MyCheck = “aM5b“ Like “aL-P#!c-e“ 返回 True。 MyCheck = “BAT123khg“ Like “B?T*“ 返回 True。 MyCheck = “CAT123khg“ Like “B?T*“ 返回 False。 四、逻辑运算符 And （与）、Eqv（等价）、Imp（蕴含）、Not（非）、Or（或）、 Xor（异或）,与,或,非,五、表达式 1、组成 常量、变量、运算符、圆括号。 2、书写规则 乘号不能省略。 括号必须成对出现，均使用圆括号。 表达式从左到右在同一基准上书写，无高低、大小。 例:,(b-sqr(b*b-4*a*c)/(2*a),(a+b)/(a-b),sin(45*3.14/180)+(exp(10)+log(10)/sqr(x+y+1),3、优先级 算术运算符=字符运算符关系运算符逻辑运算 例： (34+2)(70/2) AND “AA“ 35 AND “AA“(“AB“) 关系 True AND True 逻辑 True,3.7 基本语句 一、赋值语句（Let 语句） 格式：Let 变量名 =表达式 将表达式的值赋给变量或属性。 说明： 只有当表达式是一种与变量兼容的数据类型时，该表达式的值才可以赋给变量或属性。不能将字符串表达式的值赋给数值变量，也不能将数值表达式的值赋给字符串变量。如果这样做，就会在编译时间出现错误。 例：Dim MyStr, MyInt 下面的变量赋值使用了 Let 语句。 Let MyStr = “Hello World“ Let MyInt = 5 或：MyStr = “Hello World“ MyInt = 5,注意： 1. 执行过程：先求表达式的值，然后将值赋值给左边的变量。 2. 右边表达式可以是变量、常量、函数调用等特殊的表达式。 3. 不要将“”理解为数学上的等号： A=A+1 是表示将A单元的值加后以放回到A单元。 执行过程如图：,4赋值符号“=”左边一定只能是变量名或对象的属性引用，不能是常量、符号常量、表达式。 下面的赋值语句都是错的： 5=X 左边是常量。 Abs(X)=20 左边是函数调用，即是表达式。 5. 赋值符号“=”两边的数据类型一般要求应一致。,二、与用户交互的函数、过程 1、InputBox 函数 在一对话框来中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容。 格式： InputBox(提示, 标题 , 缺省 , x坐标 , y坐标 , 帮助文件,帮助上下文编号) 提示：必需的。作为对话框消息出现的字符串表达式 标题：可选的。显示对话框标题栏中的字符串表达式。如果省略 ，则把应用程序名放入标题栏中。 缺省：显示文本框中的字符串表达式，在没有其它输入时作为缺省值。如果省略 ，则文本框为空。 x坐标, y坐标：指定对话框的左边与屏幕左边的水平距离、上边与屏幕上边的距离。如果省略 ，则对话框被放置在水平方向居中、垂直方向距下边大约三分之一的位置。 帮助文件：字符串表达式，识别帮助文件，用该文件为对话框提供上下文相关的帮助。 帮助上下文编号：数值表达式，由帮助文件的作者指定给某个帮助主题的帮助上下文编号。,有下列语句如下: Dim strName As String * 40， strS1 As String * 40 strS1 = “请输入你的姓名” + Chr(13) + Chr(10) + “然后单击确定” strName= InputBox$(strS1， “输入框”， ， 100，100) 当键盘输入“王晓明” 后,变量strName获得键盘输入的值. 例：3-5,2、MsgBox 函数 格式： MsgBox(提示, 按钮 ,标题 ,帮助文件,帮助上下文编号) 在对话框中显示消息，等待用户单击按钮，并返回一个 整型数告诉用户单击哪一个按钮。,提示：必需的。字符串表达式，作为显示在对话框中的消息。prompt 的最大长度大约为 1024 个字符，由所用字符的宽度决定。如果 prompt 的内容超过一行，则可以在每一行之间用回车符 (Chr(13)、换行符 (Chr(10) 或是回车与换行符的组合 (Chr(13) & Chr(10) 将各行分隔开来。 按钮：可选的。数值表达式是“按钮图标 +缺省按钮+模式”的总和，指定显示按钮的数目及形式，使用的图标样式，缺省按钮是什么以及消息框的强制回应等。如果省略，则按钮的缺省值为 0。,第一组值 (05) 描述了对话框中显示的按钮的类型与数目；第二组值 (16, 32, 48, 64) 描述了图标的样式；第三组值 (0, 256, 512) 说明哪一个按钮是缺省值；而第四组值 (0, 4096) 则决定消息框的强制返回性。将这些数字相加以生成 按钮 参数值的时候，只能由每组值取用一个数字。 返回值：,例：3-6,3、MsgBox语句 格式： MsgBox 提示, 按钮 ,标题 ,帮助文件,帮助上下文编号 作用与MsgBox函数一样，但没有返回值。 三、选择结构 1、单分支语句 （1）If 条件 Then 语句 （2）If 条件 Then 语句块 End If 一般为逻辑表达式、关系表达式，当结果为“真”时，执行IF与ENDIF之间的，然后再执行ENDIF后面的语句；否则，直接执行ENDIF后面的语句。,分支语句的流程图：,条件成立吗？,语句行序列,ENDIF后面的 语句,Y,N,2、双分支语句 If 条件 Then 语句块1 Else 语句块2 End If,条件成立吗？,语句行序列1,语句行序列2,ENDIF后面的 语句,Y,N,例：3-7,3、多分支语句 If 条件1 Then 语句块-1 ElseIf 条件2 Then 语句块-2 . Else 语句块-n End If Visual Basic 首先测试 条件1。如果它为 False，Visual Basic就测试 条件2，依次类推，直到找到一个为 True 的条件。当它找到一个为 True 的条件时，Visual Basic就会执行相应的语句块，然后执行 End If 后面的代码。作为一个选择，可以包含 Else 语句块，如果条件都不是 True，则 Visual Basic 执行 Else 语句块。,4、情况语句 Select Case 变量或表达式 Case 表达式列表1 语句块-1 Case表达式列表2 语句块-2 Case Else 语句块-n End Select Select Case 在结构的上方处理一个测试表达式并只计算一次。然后，Visual Basic 将表达式的值与结构中的每个 Case 的值进行比较。如果相等，就执行与该 Case 相关联的语句块。,条件1,条件2,条件n,有其它否,End Select后面的语句,语句块1,语句块2,语句块n,语句块n+1,T,T,T,T,F,F,F,F,如果在一个列表中有多个值，就用逗号把值隔开。如果不止一个 Case与测试表达式相匹配，则只对第一个匹配的 Case 执行与之相关联的语句块。如果在表达式列表中没有一个值与测试表达式相匹配，则 Visual Basic 执行 Case Else 子句（此项是可选的）中的语句。,“表达式列表”的四种形式： 只有一个常量或单个字符常量。 例： Case 5 或 Case “abc” 在表达式列表有多个数值或字符串，多个取值之间用逗号隔开。如果表达式的值与其中一个数值或字符串相等，即可执行表达式列表后相应的语句序列；否则，若均不相等，再与随后的其他表达式列表进行比较。 例：Case 2,4,6,8 或 Case “A”,”B”,”C”,”D” 表达式1 to表达式2（To表达式），表示一个数值或字符串的取值范围，要求“表达式1”的值小于“表达式2”的值。 例：Case 5 To 10 或 Case “A” To “B” Is 关系运算符 数值或字符串，Is是关键字，其后只能使用=、=、等运算符。将测试表达式的值与关系运算符后面的数值或字符串进行比较。 例：Case Is ”A” 或 Case Is =1000,例：3-8,5、条件函数（ IIf 函数） 格式：IIf(表达式,当条件为True时的值, 当条件为false时的值) 例：dengji = IIf(fenshu =60, “及格”, “不及格”) 由于 IIf 会计算当条件为True时的值和 当条件为false时的值，虽然它只返回其中的一个。因此要注意到这个副作用。例如，如果当条件为false时的值产生一个被零除错误，那么程序就会发生错误，即使当条件值为 True。,6、选择结构的嵌套 在IF语句的Then分支和Else分支中可以完整地嵌套另一IF语句或Select Case语句，同样Select Case语句每一个Case分支中都可嵌套另一IF语句或另一Select Case语句。下面是两种正确的嵌套形式： （1）IF Then if Then Else End If . Else . IF Then Else End If End IF,（2）IF Then Select Case Case IF Then Else End If Case. End Select . End IF,注意： 只要在一个分支内嵌套，不出现交叉，满足结构规则，其嵌套的形式将有很多种，嵌套层次也可以任意多。 对于多层IF嵌套结构中，要特别注意IF与Else的配对关系，一个Else必须与IF配结，配对的原则是：在写含有多层嵌套的程序时，建议使用缩进对齐方式，这样容易阅读和维护。,四、循环结构 循环结构允许重复执行一行或数行代码。Visual Basic 支持的循环结构有： For.Next While.Wend DoLoop 1、For循环语句 格式：For 循环变量 = 初值 To 终值 Step 步长 语句块 EXIT For Next 循环变量 说明： （1）循环变量、初值、终值、步长都是数值型的 （2）Exit For退出循环。,在执行 For 循环时，Visual Basic 设置“循环变量”等于“初值”。 测试“循环变量”是否大于“终值” 。若是的话，则 Visual Basic 退出循环。 （若“步长”为负，则 Visual Basic 测试“循环变量”是否小于 “终值” 。） 执行语句。 “循环变量” 增加一，或者增加 “步长” （如果已指定的话）。 重复步骤 2 到步骤 4,循环变量在终值内,循环变量加步长,NEXT后面的语句,EXIT For,T,F,计算1100的奇数和 Dim I as integer,s as integer s=0 For I=1 to 100 step 2 s=s+I Next I,开始,X=1:Y=1,X=9?,Y=9?,SE=X*Y,输出一个式子,Y=Y+1,X=X+1:Y=1,换行,结束,T,F,F,T,循环的嵌套（九九乘法表） For i = 1 To 9 For j = 1 To 9 se = Str(i) Next j Picture1.Print Next I 例：39,2、 WhileWend语句 格式：While 条件 语句块 Wend 如果“条件”为 True，则所有的“语句块”都会执行，一直执行到 Wend 语句。然后再回到 While 语句，并再一次检查 “条件” ，如果 “条件” 还是为 True，则重复执行。如果不为 True，则程序会从 Wend 语句之后的语句继续执行。,条件成立吗？,语句块,Wend,Wend后面的 语句,T,F,3、Do.Loop 格式： （1）Do While | Until条件 语句块 Exit Do 语句块 Loop （2）Do 语句块 Exit Do 语句块 Loop While | Until条件 当条件为 True 时，或直到条件变为 True 时，重复执行一个语句块中的命令。 Exit Do语句：退出循环，执行Loop的下一条语句。,条件成立吗？,LOOP,LOOP后面的语句,Exit Do,T,F,Do While Loop,条件成立吗？,LOOP,LOOP后面的语句,Exit Do,F,T,Do Until Loop,条件成立吗？,LOOP后面的语句,Exit Do,T,F,Do Loop While,条件成立吗？,LOOP后面的语句,Exit Do,T,F,Do Loop Until,说明： Do While 条件Loop和Do Loop While 条件 条件为循环体执行的条件，条件不满足后结束循环。 Do Until 条件Loop和Do Loop Until 条件 条件为循环体不执行的条件，条件满足后结束循环。 上述前一种格式的特点是：先判断条件，因而循环体 可能一次也不会被执行；而后一种格式的特点则是： 执行完循环体后才判断条件，循环体至少被执行一次。 上述各种格式差别不大，一般情况下，可以根据个人 的习惯和爱好进行选择，只要注意说明即可。 do loop主要用于循环次数不固定的场合，而for next 则主要用于固定次数的循环。,例：310 求自然对数e的近似值，要求误差小于0.00001，近似公式为： e=1+1/2!+1/3!+1/n!+ 用辗转相除法求两自然数m，n的最大公约数和最小公倍数。 分析：求最大公约数的算法思想 （1）对于已知两数m,n，使mn。 （2）m除以n得余数。 （3）若r0，则n为求得的最大公约数，算法结束。否则执