说明: ①“条件”可以是关系表达式、布尔表达式、 数值表达式或字符串表达式。 ■ 对于数值表达式,VB将0作为False、非0作 为True处理。 对于字符串表达式,VB只允许包含数字的 字符串,当字符串中的数字值为0时,则认 为是False,否则认为是True。 16
16 说明: ① “条件”可以是关系表达式、布尔表达式、 数值表达式或字符串表达式。 ◼ 对于数值表达式,VB将0作为False、非0作 为True处理。 ◼ 对于字符串表达式,VB只允许包含数字的 字符串,当字符串中的数字值为0时,则认 为是False,否则认为是True
②“语句组1”和“语句组2”分别可以包含多 条语句,各语句之间用冒号隔开。例如: If N>0 Then A=A+B:B=B+A EIse A=A-B:B=B-A ③可以没有Ese部分,表示当条件不成立时 不执行任何操作,这时必须有“语句组1”。 例如: IfX<0Then Print X
17 ② “语句组1”和“语句组2”分别可以包含多 条语句,各语句之间用冒号隔开。例如: If N>0 Then A=A+B:B=B+A Else A=A-B:B=B-A ③ 可以没有Else部分,表示当条件不成立时 不执行任何操作,这时必须有“语句组1”。 例如: If X < 0 Then Print X
注意: 单行结构条件语句应作为一条语句书写。 如果语句太长需要换行,必须在折行处使 用续行符号。 无论条件是否成立,单行结构条件语句的 出口都是本条件语句之后的语句。 单行结构条件语句可以嵌套,也就是说, 在“语句组1”或“语句组2”中可以包含另 外一个单行结构条件语句。例如: If x>0 Then Ify>0Thenz=x+y Else Z=x-y Else Print "error" 18 合D
18 ◼ 单行结构条件语句应作为一条语句书写。 如果语句太长需要换行,必须在折行处使 用续行符号。 ◼ 无论条件是否成立,单行结构条件语句的 出口都是本条件语句之后的语句。 ◼ 单行结构条件语句可以嵌套,也就是说, 在“语句组1”或“语句组2”中可以包含另 外一个单行结构条件语句。例如: If x > 0 Then If y > 0 Then z = x + y Else _ z = x - y Else Print "error" 注意:
【例43】用单行结构条件语句计算以下y 值。 x≤0 y= Inx x0 界面设计: 计算分段函数 X= 计算了 Textl Label3 Commandl 9合D
19 【例4-3】 用单行结构条件语句计算以下y 值。 | | 0 ln > 0 x x y x x = ≤ 界面设计: Text1 Label3 Command1
代码设计: Private Sub Command1 ClickO X=Val(Text1.Text) IfX<=0 Then Y=Abs(X)Else Y-Log(X) Label3.Caption =Y End Sub 20 合>
20 Private Sub Command1_Click() X = Val(Text1.Text) If X <= 0 Then Y = Abs(X) Else Y = Log(X) Label3.Caption = Y End Sub 代码设计: