02分支结构if命令.doc

逻辑运算与分支if命令 厦门六中肖海 任务引入1. 建立“分支结构练习”文件夹 请在s:盘建立如下文件夹：“S:\xx班\gxxxx\算法与程序设计\分支结构练习” 2. 建立“00计算三角形面积”文件夹 继续在s盘上述“分支结构练习”文件夹里建立“00计算三角形面积”的子文件夹 3. 新建工程与窗体文件 保存在上述s盘“00计算三角形面积”文件夹里。 工程文件名“计算三角形面积.vbp”, 窗体文件名“计算三角形面积.frm” 4. 实现以下功能能 1）能够输入三角形的三条边长；2）能计算并显示出三角形的面积 思考题1： 如何进行输入？如何进行计算？如何进行输出？ 5. 分析 1）输入可以用文本框或InputBox命令（任选一种方便的来用），记住得有3个输入； 2）输入要有提示：例如用标签对文本框进行提示如“输入边a”等 3）输出可以用文本框或标签或MsgBox命令。（任选一种） 4）什么时候开始计算：可以用按钮，也可以不用按钮，直接写在在输出的控件的click事件但用加标签提示 5）已知三角形的三条边的边长如何计算面积 6. 数据类型和计算函数参考： 类型占用空间数据范围说明举例Integer2字节最小 -32768 到 最大32767 的5位整数Dim L As IntegerLong4字节最小 -2147483648 到 最大2147483647 的 10位整数Dim Total As LongSingle4字节可存储小数，科学计数到45位，但有效数位只有7位 例如 –2.134*10-20Dim S As SingleDate8字节日期和时间要用# #号括起来， 年月日用 - 分隔，时分秒用 ：分隔。 必须用英文符号。Dim Tday As Date 函数作用应用举例例子说明Abs（x）求出x的绝对值a = abs(-6)结果 变量a的值为 6Val（X）将字符型的X转换成对应的数值a=val(”-6.5”)结果 变量a的值为 -6.5Sqr（X）求出x的平方根a = sqr(9)结果 变量a的值为 3Int（X）求出不大于x的最大整数(正数截尾取整，负数取)a = int(-2.1) a = int(2.1)结果 变量a的值为 -3 结果 变量a的值为 2 7. 检验运行结果 请自己输入几个容易检验的几组数据，检验运行结果是否正确。 问题引入 思考题2： 如果输入的三条边为，2,3,6这不能构成三角形怎么办？ 检验输入的三个数是否能构成三角形，要用到if命令 和 关系运算 if命令举例 例子1 if a 0 then MsgBox ”输入的数大于零” else MsgBox ”输入的数小于或等于零” 说明：如果 a的值大于0 就输出 “输入的数大于零” 否则 输出 ” 输入的数小于或等于零” 例子2 if a 0 then MsgBox ”输入的数大于零” Else MsgBox ”输入的数小于或等于零” End if 说明：总用同例题1，只是使用的格式不同。例题1使用一行格式，例题2使用多行格式 例子3 if a b then c = a a = b b = c End if 说明：如果 a b 才 执行 then 之后，end if 之前的命令。 If命令解释 分支结构语句的完整格式（多行格式） 当条件表达式运算的结果为true时才执行， If 条件表达式 Then 语句组1 …… Else 当条件表达式运算的结果为false时才执行， 语句组2 …… End If 说明：语句组1和语句组2，其中只有一个能被执行，这取决于条件表达式的运算结果。 如果条件结果为true，只执行语句组1，否则（条件结果不为true）则只执行语句组2。 再说明：if是根据条件表达式运算的结果来控制哪些程序可以执行，哪些程序不可以执行。 注意事项： If Then 必须写在同一行，Then后边不能写任何命令。 Else 必须单独一行，且右边不能写任何命令。 End if也必须单独在一行。 命令写在Then 与Else之间的段落, 或Else与End If之间的段落。 If Else End 必须对齐。 分支语句块中的命令 必须比If 及Else多空两个空格，显示缩进效果。 关系表达式 if 命令中的 条件表达式常常使用 关系表达式 关系表达式阅读P43，关系运算符。关键点请在课本划线 思考以下问题： * 关系是数学上的不等式吗？ * 关系运