VB三种程序结构VisualBasic语言作为结构化程序设计知识讲稿.pptVIP

编写的窗体单击事件过程代码如下： Private Sub Form_Click() Dim weight As Single, pay As Single weight = InputBox(请输入行李重量, 输入框) If weight 40 Then pay = (weight - 40) * 0.5 + 40 * 0.2 Else pay = weight * 0.2 End If Print 行李重量= weight Print 所付费用= pay End Sub 3. If…Then …Else If 语句（多分支结构）结构 语句格式： If 〈表达式1 〉Then 〈语句块1〉 ElseIf 〈表达式2〉Then 〈语句块2〉 … … [Else 〈语句块 n+1 ] End If F T T T …… 表达式1 表达式2 表达式nn 语句块1 语句块2 语句块nn 语句块n+11 F… 图3.10 多分支结构 说明： ① 不管有几个分支，程序执行了一个分支后，其余分支不再执行。 ② ElseIf子句的数量没有限制，可以根据需要使用任意多个ElseIf子句。 例： 【