VB顺序结构与选择结构

1、VB顺序结构与选择结构文成县第二高级中学 信息技术顺序结构执行过程的次序从上到下，从左到右。例：请问此时的c的值是多少？a = 10b = a*2c = a+b在顺序结构中，由多条赋值语句构成，那么我们一起来看下赋值语句。赋值语句赋值语句用来表明赋给某一个变量一个具体的确定值的语句叫做赋值语句。在算法语句中，赋值语句是最基本的语句。赋值语句的格式：1.变量名 = 表达式（ a = 10 或 b = 2 * a ）2.对象名.属性名 = 表达式注意：如果在同一行中出现多个赋值语句，则语句之间用冒号隔开。选择结构选择结构是一种常用的基本结构，其特点是根据所给定的选择条件为真或假，来决定从不同操作中

2、选择执行一种操作。 行If语句If 条件表达式 Then 语句1 Else 语句2或If 条件表达式 Then 语句块If语句If 条件表达式1 Then语句块1ElseIf 条件表达式2 Then语句块2Else语句块0End if条件语句1语句2真假例例：根据根据以下分段函数，任意输入一个以下分段函数，任意输入一个x值，求值，求出出y值。值。2, 652, 923xxxxxy分析：当x2时，用公式yx39来求y的值；当x= 2 Then y = x 3 - 9 Else y = x 2 + 5 * x - 6 Text2.Text = yEnd Sub块If语句Private Sub Co

3、mmand1_Click( ) Dim x As Single x = Val(Text1.Text)If x = 2 Then y = x 3 - 9 Else y = x 2 + 5 * x 6End if Text2.Text = yEnd SubIf语句的嵌套If语句的嵌套是指语句序列1或语句序列2本身又是一个If语句。语法格式：If ThenIf ThenElseEnd IfElseEnd If条件2条件1If语句的嵌套例：铁路托运行李，从甲地到乙地，规定每张客票托运费计算方法是行李重量不超过50kg时，0.25元/kg，超过50kg而不超过100kg时，其超过部分按0.35元/kg

4、收费，超过100kg时，其超过部分按0.45元/kg收费。编写程序，输入行李重量，计算并输出托运的费用。分析：设行李重量为wkg，应付运费为x元，则运费公式为：)100()10050()50()100(45. 05035. 05025. 0)50(35. 05025. 025. 0wwwwwwxIf语句的嵌套w = Val(Text1.Text) If w = 50 Then x = 0.25 * w Else If w = 100 Thenx = 0.25 * 50 + 0.35 * (w50) Else x = 0.25 * 50 + 0.35 * 50 + 0.45 * (w100) End If End If Text2.Text = x练习1.输入2个不同的数x、y，将它们从大到小排序。2.当a5时，b=a * 8 3.假定每周的工