03 选择语句 课件—2022届高考信息技术一轮复习选考VB部分复习

选择语句 注意：P56 Q3 中—— 符号“\”为整除，即取商的整数部分 如 5 \ 3 结果为1 “A Mod B”为求A除以B所得的余数 如5 Mod 3 ，结果为2 3 Mod 5 ，结果为3 P60 Q3中“And”为逻辑与。 例：在表达式A = 0 And B = 1中 ,两个条件均成立，则表达式值为True，否则为False 7/28/2021 一些错误提示 7/28/2021 选择语句（分支结构） 1. 块IF语句语法 If 条件表达式 Then 语句1 [Else 语句2 ] End If 表达式为True? N Y 执行语句1 执行语句2 开始 结束 分支结构流程图 程序1.0 Private Sub Command1_Click() Dim r As Single , s As Single r = Val(Text1.Text) If r < 0 Then Label4.Caption = "请输入不小于0的半径值" Else s = 3.14 * r ^ 2 Text2.Text = Str(s) End If End Sub 程序1.1 Private Sub Command1_Click() Const pi = 3.1416 Dim r As Single , s As Single r = Val(Text1.Text) If r = 0 Then MsgBox ("请输入半径值") Else If r < 0 Then Label4.Caption = "请输入不小于0的半径值" Else s = pi * r ^ 2 Text2.Text = Str(s) End If End If End Sub 改进 S<0? N Y 开始 结束 输入R 请输入不小于0的半径值 面积小于等于10 R为空 请输入数值 Y S←3.14*R2 N 读此程序 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Label1.Caption = Label1.Caption & Text1.Tex